1. MsgBox的基本语法格式:
MsgBox(prompt[, buttons] [, title] [, helpfile, context])
2. prompt参数(必选参数):该参数用于表明输出对话框所显示的内容,由于该参数只代表长度为255个字符的一个字符串,因此我们可以使用“&”连接符将各部分字符串连接起来,同时可以借助函数“Chr(10)”实现换行操作。
3.
Buttons参数(可选参数):用于定义输出窗口的按钮样式及图标显示类型,常见按钮样式如下:
按钮类型 对应数值 描述
vbOKOnly 0 只显示 OK 按钮。
VbOKCancel 1 显示 OK 及 Cancel 按钮。
VbAbortRetryIgnore 2 显示 Abort、Retry 及 Ignore 按钮。
VbYesNoCancel 3 显示 Yes、No 及 Cancel 按钮。
VbYesNo 4 显示 Yes 及 No 按钮。
VbRetryCancel 5 显示 Retry 及 Cancel 按钮。
VbCritical 16 显示 Critical Message 图标。
VbQuestion 32 显示 Warning Query 图标。
VbExclamation 48 显示 Warning Message 图标。
VbInformation 64 显示 Information Message 图标。
如图为设置按钮类型为“VbInformation”时的效果:
4. Title参数(可选参数):用于定义在输出窗口标题栏处显示的文本内容,如图设置其标题栏为“提示”时的效果:
5.
MsgBox的返回值:该输出框会根据用户所点击的按钮的类型返回对应的常量:
常数 值 描述
vbOK 1 OK
vbCancel 2 Cancel
vbAbort 3 Abort
vbRetry 4 Retry
vbIgnore 5 Ignore
vbYes 6 Yes
vbNo 7 No
编写如图所示的验证代码:
Sub 实例MsgBox()
If vbOK = (MsgBox("请点击确定按钮", vbOKCancel, "提示")) Then
MsgBox "确定按钮被点击", vbOKOnly
End If
6. 点击“运行子过程”按钮
7. 就可以看到效果啦。