填空题

下列程序的功能是：弹出一个对话框询问用户是否输出，如果是，则输出：否则结束。请填空。 Sub PrintOut() Dim a As Integer a=MsgBox("输出结果",vblnformation+vbYesNo，"提示：") If a=______Then Print "Myresult" End If End Sub