我在form_unload事件中还能根据条件判断使窗体不关闭吗？

Question

在Form_QueryUnload事件里做判断，这个事件在窗体关闭之前发生

Answer 1

我试了一下，只要是QueryUnload这个事件发生了，不管根据什么条件判断，form_unload肯定会发生。这样还是起不到我说的那种效果啊

Answer 2

sub Form_QueryUnload()
if 未保存 then 
 msgbox( "Save or Not?",vbyesno+vbquestion)=vbyes 
 cancel=true
else
 cancel=false
end ifend sub

Answer 3

楼上的你会不会啊？不要误倒人啊！
在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 因为窗体的所有者正在关闭，所以窗体也在关闭。 
若你将cancel参数设为true则可拒绝unload窗体