VBScript MsgBox 函数MsgBox 函数的功能是弹出一个对话框,等待用户单击按钮,并返回一个 Integer 值表示用户单击了哪一个按钮。
完整的 VBScript 参考手册 MsgBox 函数显示一个消息框,等待用户点击某个按钮,然后返回指示被点击按钮的值。 MsgBox 函数返回下面的值: - 1 = vbOK - OK 按钮被点击
- 2 = vbCancel - Cancel 按钮被点击
- 3 = vbAbort - Abort 按钮被点击
- 4 = vbRetry - Retry 按钮被点击
- 5 = vbIgnore - Ignore 按钮被点击
- 6 = vbYes - Yes 按钮被点击
- 7 = vbNo - No 按钮被点击
注意:当 helpfile 和 context 参数均被规定后,用户可按 F1 键来查看帮助。 提示:请参阅 InputBox 函数。 语法 MsgBox(prompt[,buttons][,title][,helpfile,context])
参数 | 描述 | prompt | 必需。作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符,这取决于所使用的字符的宽度。如果 prompt 中包含多个行,则可在各行之间用回车符(Chr(13))、换行符(Chr(10))或回车换行符的组合(Chr(13) & Chr(10))分隔各行。 | buttons | 可选,是表示指定显示按钮的数目和类型、使用的图标样式,默认按钮的标识以及消息框样式的数值的总和。默认值为 0。 - 0 = vbOKOnly - 只显示 OK 按钮
- 1 = vbOKCancel - 显示 OK 和 Cancel 按钮
- 2 = vbAbortRetryIgnore - 显示 Abort、Retry 和 Ignore 按钮
- 3 = vbYesNoCancel - 显示 Yes、No 和 Cancel 按钮
- 4 = vbYesNo - 显示 Yes 和 No 按钮
- 5 = vbRetryCancel - 显示 Retry 和 Cancel 按钮
- 16 = vbCritical - 显示临界信息图标
- 32 = vbQuestion - 显示警告查询图标
- 48 = vbExclamation - 显示警告消息图标
- 64 = vbInformation - 显示信息消息图标
- 0 = vbDefaultButton1 - 第一个按钮为默认按钮
- 256 = vbDefaultButton2 - 第二个按钮为默认按钮
- 512 = vbDefaultButton3 - 第三个按钮为默认按钮
- 768 = vbDefaultButton4 - 第四个按钮为默认按钮
- 0 = vbApplicationModal - 应用程序模式(用户必须响应消息框才能继续在当前应用程序中工作)
- 4096 = vbSystemModal - 系统模式(在用户响应消息框前,所有应用程序都被挂起)
我们可以把按钮分成四组:第一组值(0-5)用于描述对话框中显示的按钮类型与数目;第二组值(16,32,48,64)用于描述图标的样式;第三组值(0,256,512,768)用于确定默认按钮;而第四组值(0,4096)则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时,只能从每组值中取用一个数字。 | title | 可选。消息框的标题。默认是应用程序的名称。 | helpfile | 可选。字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。必须与 context 参数一起使用。 | context | 可选。数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。必须与 helpfile 参数一起使用。 | 实例 实例 1 <script type="text/vbscript"> MsgBox("Hello world") </script> 尝试一下 » 实例 2 带有换行符的消息框: <script type="text/vbscript"> MsgBox("Hello" & chr(13) & "world") </script> 尝试一下 » 实例 3 不同的 buttonsets 和不同的图标。返回点击的按钮的值: <script type="text/vbscript"> x=MsgBox("Hello world",n) document.getElementById("myDiv").innerHTML="You clicked: " & x </script> 尝试一下 » 实例 4 带有标题的消息框: <script type="text/vbscript"> x=MsgBox("Are you a programmer",4,"Please answer") </script> 尝试一下 » 完整的 VBScript 参考手册
|
请发表评论