Question

VBS的msgbox对话框中,如何定义点击"确认"或"取消"后的动作?

在VBS中,如果我想在一个msgbox对话框中点击"确定",则弹出msgbox"1",如果点击"取消",则弹出msgbox"2",代码该怎么写?

表达得不是很清楚,见谅

Answer 1

msgbox函数有返回值的
MsgBox(prompt[, buttons] [, title] [, helpfile, context])
返回值
　　用于MsgBox函数返回值的常量
　　常数值 说明
　　vbOK 1 确定
　　vbCancel 2 取消
　　vbAbort 3 终止
　　vbRetry 4 重试
　　vbIgnore 5 忽略
　　vbYes 6 是
　　vbNo 7 否

定义一个变量接收他的返回值，或者直接进行判断
　 　Ans=MsgBox(“Continue?”,VbOKCancel )或者
　　 If MsgBox(“Continue?”,VbOKCancel )=vbOK Then msgbox（“1”，vbOkOnly）
　　If MsgBox(“Continue?”,VbOKCancel )=vbCancel Then msgbox（“2”，vbOkOnly）

Answer 2

x=msgbox("你要出现的信息",VbOkCancel)
if x=VbOk then
你想要写的代码
elseif x=Vbcancel then
你要写的代码
end if

Answer 3

根据以下常数来判断即可
vbOK 1 “确定”按钮被单击。
vbCancel 2 “取消”按钮被单击。
vbAbort 3 “终止”按钮被单击。
vbRetry 4 “重试”按钮被单击。
vbIgnore 5 “忽略”按钮被单击。
vbYes 6 “是”按钮被单击。
vbNo 7 “否”按钮被单击。