 |
| 我的知识库 |
 |
|
|
如何在退出整个系统前提示用户 |
|
[ 作者： | 文章来源： 编程中国 | 点击数： 583 | 更新时间： 2007-10-13 17:42:16 ] |
很简单，建立一个窗体，名字叫隐藏，并在启动选项内选定这个窗体为启动时自动打开。 中.国南通服务器网
然后在窗体的加载事件内加入如下代码： Www_Spdns_com
以下为引用的内容：
Private Sub Form_Load()
Me.Visible = False
End Sub Spdns.com
'在窗体的卸载事件中加入如下代码：
Private Sub Form_Unload(Cancel As Integer)
If MsgBox("你真的要退出吗？", vbYesNo + vbQuestion, "请确认…") = VBNo Then Cancel = True
End Sub Www.Spdns.com
|
中国南通服务器网
|
|
|
|
|
