VB中如何设置MSGBOX有“确定”“取消”2个按钮的

2024年12月05日 07:26

有5个网友回答

网友（1）：

Private Sub Form_Unload(Cancel As Integer)
    If MsgBox("你确定退出程序吗？", 1 + 64 + 256) = vbCancel Then Cancel = 1
End Sub

在UNLOAD事件中启用以上代码

网友（2）：

比如 Private Sub Form_Load()
MsgBox "输入数据", vbOKCancel, "有2个按钮了" '那个VBOKCANCEL就是2个按钮的参数
End Sub
具体的介绍楼上已给出

网友（3）：

If MsgBox("提示", vbOKCancel, "标题") = 1 Then
'按下了确定
Else
'按下了取消或者直接关闭
End If

网友（4）：

temp = MsgBox("提示", vbDefaultButton1 + vbOKCancel, "标题")

网友（5）：

x=Msgbox("Hello World!",1)