vb中的提示对话框的语句怎么写

来源：百度知道 编辑：UC知道 时间：2024/06/25 17:12:08
就是比如说你要退出点了按钮，弹出一个提示框，问是否退出，上面可以选择是和否的那个对话框，有哪位哥哥姐姐知道告诉小弟一下

Private Sub Form_Unload(Cancel As Integer)
Dim a
a = MsgBox("你好", vbOKCancel, "提示")
If a = vbOK Then
Cancel = 0
Else
Cancel = 1
End If
End Sub

如果cancel等于0，卸载窗体
cancel非0，不卸载