填空题

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