变量 = MsgBox(<消息内容>,<对话框类型>,<对话框标题>) Private Sub Form_Click() Dim a a = MsgBox("密码错误,请重新输入", 1 + 48, "密码验证") End Sub <对话框类型>有三个参数 MsgBox()返回值:指明在对话框中选择哪个按钮