vb 结束程序确认怎么做?

来源:百度知道 编辑:UC知道 时间:2024/06/01 16:40:37
在用户点击窗口右上角的“X”后,弹出一个msgbox询问是否退出,如何制作?
thanks~

Private Sub Form_Unload(Cancel As Integer)
Dim xxxx As Integer
xxxx = MsgBox("您确认要退出吗?", vbOKCancel + vbInformation, "关闭")
If xxxx = vbCancel Then
Cancel = True
End If

End Sub

在窗体的unload事件写代码