Skip to content

MsgBox

在模式对话框中显示消息,带有选定的按钮集,等待用户点击按钮,并返回一个VbMsgBoxResult值标识该按钮。

语法:MsgBox( prompt [ , buttons ] [ , title ] [ , helpfile , context ] )

prompt
必需 字符串表达式,在对话框中显示为消息。prompt的最大长度约为1024个字符,取决于所使用字符的宽度。要将prompt分为多行,请用回车符(Chr(13))、换行符(Chr(10))或CR-LF组合(vbCrLf)分隔各行。
buttons
可选 VbMsgBoxStyle值,指定要显示的按钮数量和类型、图标样式、默认按钮标识和消息框的模态性。如果省略,buttons默认为vbOKOnly
title
可选 字符串表达式,显示在对话框的标题栏中。如果省略,则使用应用程序名称。
helpfile
可选 字符串表达式,标识用于为对话框提供上下文相关帮助的帮助文件。如果提供了helpfile,则还必须提供context
context
可选 数值表达式,给出分配给相关帮助主题的帮助上下文编号。如果提供了context,则还必须提供helpfile

buttons参数是VbMsgBoxStyle枚举值的组合:一个按钮组值(vbOKOnlyvbOKCancelvbAbortRetryIgnorevbYesNoCancelvbYesNovbRetryCancelvbCancelTryAgainContinue),可选结合一个图标值(vbCriticalvbQuestionvbExclamationvbInformation),一个默认按钮值(vbDefaultButton1vbDefaultButton4),一个模态性值(vbApplicationModalvbSystemModal),以及任何选项标志(vbMsgBoxHelpButtonvbMsgBoxSetForegroundvbMsgBoxRightvbMsgBoxRtlReading)。使用Or或加法组合值。

返回值是VbMsgBoxResult枚举中的常量之一,标识用户点击的按钮。

如果对话框显示Cancel按钮,按ESC键与点击Cancel效果相同。同时提供helpfilecontext时,用户可以按F1查看相关帮助主题;如果对话框还包含Help按钮,点击它会调用上下文相关帮助。对话框保持打开状态,MsgBox在点击非Help按钮之一之前不会返回。

INFO

要按名称传递任何参数(第一个除外),请在表达式上下文中使用MsgBox——例如,将其结果赋给变量。要跳过位置参数,请包含相应的逗号分隔符。

示例

本示例在带有YesNo按钮的对话框中显示严重错误消息;No按钮为默认按钮。MsgBox返回的值取决于用户点击的按钮。

vb
Dim Style As VbMsgBoxStyle
Dim Response As VbMsgBoxResult

Style = vbYesNo Or vbCritical Or vbDefaultButton2
Response = MsgBox("Do you want to continue?", Style, "MsgBox Demonstration")

If Response = vbYes Then
    ' User chose Yes — perform the action.
Else
    ' User chose No — back out.
End If

另请参阅

twinBASIC及其LOGO版权为作者"韦恩"所有