如何对msgbox 按纽"是"或者"否"定义

来源：百度知道 编辑：UC知道 时间：2024/06/08 06:06:10
msgbox中会弹出"确定"或者"否"
如果我想对 其中的 按纽定义一个事件,比如当点"确定"的时候 回
弹出另一个FORM那么应该如何设置呢?

dim i as integer
i = msgbox "这里写消息",vbOkCancel or vbInformation,"标题"
if i = 1 then
'按确定激发的事件
elseif i = 2 then
'按取消激发的事件
end if

主要就是第二组参数..vbokonly代表只有一个确定按钮，vbokcancel:确定|取消
vbabortretryignore：终止|重试|忽略
vbyesnocancel 是|否|取消
vbretrycancel 重试|取消

Select Case MsgBox("确定吗", vbYesNo Or vbQuestion Or vbDefaultButton1, App.Title)

Case vbYes

Case vbNo

End Select

对msgbox点“是”或“否”会返回不同的值，参考你的程序语言的api，了解相应的返回值，再在条件语句中判断就可以了。