请教一个关于窗体的小问题

[Ericsson]

当用户按下窗体右上角的关闭按钮的，要提示一下用户是否真的要关闭，
这个怎么做的？
是窗体的哪个过程？
好像不是form unload和form terminate
哪位高手知道嘛？

[bitsoft]

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If MsgBox("close?", vbOKCancel) <> vbOK Then
Cancel = True
End If
End Sub

[Ericsson]

tnaks

[naomi77]

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
if unloadmode=1 then
msgbox"是否关闭",vbokcancel
if x=vbcalcel then
cancel=1
end if
end if
end sub

[naomi77]

msgbox前面漏写了"x=" ,sorry