如何在退出整个系统前提示用户


很简单,建立一个窗体,名字叫隐藏,并在启动选项内选定这个窗体为启动时自动打开。
然后在窗体的加载事件内加入如下代码:

Private Sub Form_Load()
     Me.Visible = False
End Sub

'在窗体的卸载事件中加入如下代码:
Private Sub Form_Unload(Cancel As Integer)
     If MsgBox("你真的要退出吗?", vbYesNo + vbQuestion, "请确认…") = vbNo Then Cancel = True
End Sub


 

本文作者:



相关阅读:
ubuntu下搭建open offcie开发环境
屏蔽alt+f4代码,一个变通的方法
ASP实现带进度条的测试网速的代码程序
WordPress实现相关文章功能代码方法
ASP.NET中防止页面多次提交的代码实现
php adodb介绍
JavaScript switch case 的用法实例[范围]
如何在DataGrid控件中隐藏列
设置Win2003的本地策略应用
jquery实现的超出屏幕时把固定层变为定位层的代码
Windows Vista系统常用补丁功能介绍
Photoshop CSS网页制作的背景图 主题的引用样式
HTML表格标记教程(19):行标记<TR>属性
让超出DIV宽度范围的文字自动显示省略号...
快速导航

Copyright © 2016 phpStudy |