Private Sub Form_QueryUnload(cancel As Integer, unloadmode As Integer)
返回值unloadmode 参数返回下列值:常数 值 描述 
vbFormControlMenu 0 用户从窗体上的“控件”菜单中选择“关闭”指令。 ----正常点关闭
vbFormCode 1 Unload 语句被代码调用。 -------------?
vbAppWindows 2 当前 Microsoft Windows 操作环境会话结束。 --------关机时调用??
vbAppTaskManager 3 Microsoft Windows 任务管理器正在关闭应用程序-----。 
vbFormMDIForm 4 MDI 子窗体正在关闭,因为 MDI 窗体正在关闭。 -???
vbFormOwner 5 因为窗体的所有者正在关闭,所以窗体也在关闭。 ………………??
我想得知 系统关闭时关闭窗体, 也就是说 在系统关闭时 我想让程序完成一定动作, 都完成了后 才让系统关闭 我怎么才能

解决方案 »

  1.   

    把 Cancel 赋成 1 窗体就不能被关闭,
    把 Cancel 赋成 0 窗体就能被关闭了.
      

  2.   

    不管是通过什么方式关闭的窗口,这个事件都会发生,把后期的操作都写在这个事件里就行了。====================
    免费的学习交流网站,欢迎大家访问!
    http://www.j2soft.cn/
    http://j2soft.008.net/
      

  3.   

    Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
       MsgBox "HELLO"
    End Sub
      

  4.   

    解决了  这个事件可以判断 VB窗体是通过什么方式 关闭的   bbhere(阿忠(baby,i'll be just here waiting for you)) ( ) 信誉:100  2005-12  cuizm(射天狼) ( ) 信誉:176 
    回答 到点子上了  给分