填空题下列程序的功能是：弹出一个对话框询问用户是否输出，如果是，则输出；否则结束。
请填空。
Sub PrintOutO
Dim aAs Integer
a=MsgBox("输出结果?"，vblnformation+vbYesNo，"提示：")
If a= 1Then
Print "Myresult"
EndIf
EndSub

【正确答案】

【答案解析】vbYes或6[解析] MsgBox函数在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。返回值是一个整数，这个整数与选择的按钮有关。