Dim ret As MsgBoxResult '定义一个MsgBoxResult类型的变量ret ret = MsgBox("是否退出?", MsgBoxStyle.YesNo Or MsgBoxStyle.Information, "询问操作") 'MsgBox 函数返回的消息框上所按的按钮 If ret = MsgBoxResult.Yes Then '在消息框单击了yes按钮的话... Else '在消息框单击了no按钮的话... End Ifmsgbox函数 参考:http://tool.chinaue.com/vbs/html/vsfctMsgBox.htm...