MsgBox 弹窗

文章目录

1. 功能
2. 语法
3. 参数
4. 返回值
5. 示例
6. 备注

功能

弹出一个带按钮的对话框, 可以返回用户点击的按钮值

语法

结果 = MsgBox(提示语[, 按钮[, 标题[, 帮助文件, 编号]]])

参数

参数	数据类型	解释
提示语	字符串	显示在弹窗中的描述文字
按钮	整数型	可选, 显示按钮类型, 图标样式, 默认按钮等设置, 详见下面表格
标题	字符串	可选, 弹窗的标题内容, 省略为程序标题
帮助文件	字符串	可选, 提供帮助的文件, 一般用不到
编号	整数型	可选, 帮助文件编号, 一般用不到

按钮常量名	值	描述
`vbOKOnly`	`0`	只显示确定按钮。
`vbOKCancel`	`1`	显示确定和取消按钮。
`vbAbortRetryIgnore`	`2`	显示放弃、重试和忽略按钮。
`vbYesNoCancel`	`3`	显示是、否和取消按钮。
`vbYesNo`	`4`	显示是和否按钮。
`vbRetryCancel`	`5`	显示重试和取消按钮。
`vbCritical`	`16`	显示临界信息图标。
`vbQuestion`	`32`	显示警告查询图标。
`vbExclamation`	`48`	显示警告消息图标。
`vbInformation`	`64`	显示信息消息图标。
`vbDefaultButton1`	`0`	第一个按钮为默认按钮。
`vbDefaultButton2`	`256`	第二个按钮为默认按钮。
`vbDefaultButton3`	`512`	第三个按钮为默认按钮。
`vbDefaultButton4`	`768`	第四个按钮为默认按钮。
`vbApplicationModal`	`0`	应用程序模式：用户必须响应消息框才能继续在当前应用程序中工作。
`vbSystemModal`	`4096`	系统模式：在用户响应消息框前，所有应用程序都被挂起。

按钮参数说明

第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 按钮 参数值时，只能从每组值中取用一个数字。例如1+16+256表示显示按钮和取消按钮, 显示临界信息图标, 以第二个按钮为默认值

返回值

整数型, 返回用户点击的按钮值, 详见下表

常数名	常数值	描述
`vbOK`	`1`	确定按钮被单击。
`vbCancel`	`2`	取消按钮被单击。
`vbAbort`	`3`	终止按钮被单击。
`vbRetry`	`4`	重试按钮被单击。
`vbIgnore`	`5`	忽略按钮被单击。
`vbYes`	`6`	是按钮被单击。
`vbNo`	`7`	否按钮被单击。

示例

Dim 结果

结果 = MsgBox("紫猫老师是不是很帅!", vbYesNo + vbQuestion)
If 结果 = vbYes Then 
    TracePrint "你答对了, 紫猫老师真帅~"
Else 
    TracePrint "你错了, 紫猫老师肯定很帅!"
End If

备注

如果对话框显示取消按钮，则按 ESC 键与单击取消的效果相同。
如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。但是在单击其他按钮之前，不会返回任何值。