AutoCAD 3DMAX C语言 Pro/E UG JAVA编程 PHP编程 Maya动画 Matlab应用 Android
Photoshop Word Excel flash VB编程 VC编程 Coreldraw SolidWorks A Designer Unity3D
 首页 > ACCESS

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

51自学网 http://www.51zixue.net

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

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

 

 

 
上一篇:获取程序所在的目录及全名【AKB00001】  下一篇:数据库并发问题详述