请问,用vb编程,怎么判断用户点击了右上角的叉叉??

来源:百度知道 编辑:UC知道 时间:2024/05/28 13:32:01
因为我要做一个功能:用户点击右上角的叉叉退出的时候,我要弹出一个窗口提醒用户要先完成没有完成的工作才能退出。想了很久,希望有人能帮我。谢谢大家

Private Sub Form_Unload(Cancel As Integer)
If MsgBox("确定要退出吗?" & vbCrLf & "确定将关闭窗口,取消则返回", vbQuestion + vbOKCancel, "关闭窗口") = vbCancel Then
Cancel = 1
End If
End Sub