问题
填空题
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出:否则结束。请填空。 Sub PrintOut() Dim a As Integer a=MsgBox("输出结果",vblnformation+vbYesNo,"提示:") If a=______Then Print "Myresult" End If End Sub
答案
参考答案:vbYes或6
解析:
M38Box函数在对话框中显示消息,等待用户单击按钮,并返回一个Integer告诉用户单击哪一个按钮。返回值是一个整数,这个整数与选择的按钮有关,如下表所示。
常数 | vbOK | vbCancle | vbAbort | vbRetry |
值 | 1 | 2 | 3 | 4 |
描述 | OK | Cancle | Abort | Retry |
常数 | vbIgnore | vbYes | vbNo | |
值 | 5 | 6 | 7 | |
描述 | Ignore | Yes | No |