问一个很菜的问题,VB6.0怎么退出全部程序?

chxuxu 2005-04-30 09:07:08
呵呵,好久没用了.忘光了,查资料麻烦,就充分利用网络,麻烦大家了.
...全文
359 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
therockdelt 2005-04-30
  • 打赏
  • 举报
回复
end

关闭所有记录集 set ...=nothing就 OK了
scyshys 2005-04-30
  • 打赏
  • 举报
回复
end会直接关闭ado对象吗?
Featured 2005-04-30
  • 打赏
  • 举报
回复
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Private Const WM_CLOSE = &H10

Private Sub Command1_Click()
SendMessage Me.hwnd, WM_CLOSE, 0, 0
End Sub
Featured 2005-04-30
  • 打赏
  • 举报
回复
End
或者:
SendMessage(me.hwnd,WM_CLOSE)
guixian310 2005-04-30
  • 打赏
  • 举报
回复
一个一个unload也行啊 不过记得把记录集关闭了
chinabillyang 2005-04-30
  • 打赏
  • 举报
回复
end
zuoxingyu 2005-04-30
  • 打赏
  • 举报
回复
退出前把所有数据连接关闭,所有记录集关闭

然后END就可以了
jykuwang 2005-04-30
  • 打赏
  • 举报
回复
End
neuafei 2005-04-30
  • 打赏
  • 举报
回复
看看历史记录吧,前2天刚有这样的问题
xingnup 2005-04-30
  • 打赏
  • 举报
回复
用"END"就可以了!

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧