Question

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

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）