VB怎么判断窗口是按下红X关闭还是别的关闭

VB怎么判断窗口是按下红X关闭还是别的关闭



'判断窗口是按下按下红X关闭
Private Sub Form_QueryUnload(cancel As Integer, unloadmode As Integer)
If unloadmode <> 1 Then End
End Sub

==================================================

'VB怎么判断窗口是按下红X关闭还是别的关闭
Private Sub Form_QueryUnload(cancel As Integer, unloadmode As Integer)
看unloadmode说明
unloadmode 参数返回下列值：

常数 值 描述
vbFormControlMenu 0 用户从窗体上的“控件”菜单中选择“关闭”指令。
vbFormCode 1 Unload 语句被代码调用。
vbAppWindows 2 当前 Microsoft Windows 操作环境会话结束。
vbAppTaskManager 3 Microsoft Windows 任务管理器正在关闭应用程序。
vbFormMDIForm 4 MDI 子窗体正在关闭，因为 MDI 窗体正在关闭。
vbFormOwner 5 因为窗体的所有者正在关闭，所以窗体也在关闭。

if unloadmode<>1 then'条件你可以自己加

end if
end Sub

_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/