标题:怎么一下退出程序
只看楼主
zfjyyzycl
Rank: 2
等 级:论坛游民
帖 子:239
专家分:10
注 册:2006-4-15
结帖率:28.57%
 问题点数:0 回复次数:6 
怎么一下退出程序
我自己编写了个程序,无论用户的操作在什么地方出现系统设定的问题,就出现警告,用户点击警告对话框后直接全部退出程序
搜索更多相关主题的帖子: 对话框 用户 
2006-05-12 20:14
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
得分:0 
End

E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-12 20:19
dinnalove
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2006-5-13
得分:0 
你要退出整个程序就用“end”,如果你要退出一个窗口就用“exit sub”
2006-05-13 16:22
xinfresh
Rank: 4
等 级:贵宾
威 望:13
帖 子:594
专家分:0
注 册:2006-1-13
得分:0 

不好意思,楼上的,
退出整个程序用:End
退出一个窗口用:Unload Me
退出一个过程用:Exit Sub
退出一个函数用:Exit Function
退出一个For用:Exit For
退出一个Do用:Exit Do

呵,仿佛退什么就Exit 什么的样子……


E-mail:xinfresh@QQ:383094053校内:http:///getuser.do?id=234719042
2006-05-13 17:15
zfjyyzycl
Rank: 2
等 级:论坛游民
帖 子:239
专家分:10
注 册:2006-4-15
得分:0 
表示感谢,知道了
2006-05-14 22:03
hailangxing
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-5-30
得分:0 

end 可以结束整个程序,它不处理form.unload事件,刚刚知道的,给大家共享

2006-05-30 12:08
maui2000
Rank: 1
等 级:新手上路
威 望:1
帖 子:113
专家分:0
注 册:2006-5-23
得分:0 

Dim response
response = MsgBox("警告提示”", vbYesNo + vbQuestion, "")
If response = 6 Then '点击确认
'退出
else
if response = 7 Then '点击取消
'事件代码
end if
end if

[此贴子已经被作者于2006-5-30 12:36:38编辑过]

2006-05-30 12:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-63693-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.218480 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved