程序结束时出错,从来没遇到!请帮忙想想办法!

btone 2004-06-18 02:32:44
Private Sub mnuExit_Click()
On Error Resume Next

Dim response As Integer
response = MsgBox("你想退出系统吗??", vbYesNo + vbQuestion, "提示")
If response = vbNo Then Exit Sub
End
End Sub

执行结果是,退出了程序 但是Windows系统信息!

标题"房屋中介系统.exe - 应用程序错误"

"0x089902b3指令引用的0xc0a19b04内存.该内存不能为"written",要终止应用程序,单击"确定""
...全文
51 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
btone 2004-06-18
  • 打赏
  • 举报
回复
help
btone 2004-06-18
  • 打赏
  • 举报
回复
help
btone 2004-06-18
  • 打赏
  • 举报
回复
unlaod me 我也用了呀,可惜问题依旧,请问那用什么退出!!??
y1g1y1 2004-06-18
  • 打赏
  • 举报
回复
请不要轻易使用 End!
victorycyz 2004-06-18
  • 打赏
  • 举报
回复

尽量不用end强行退出。
btone 2004-06-18
  • 打赏
  • 举报
回复
help

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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