VBScript的输入与输出

2.1 VBScript的输入与输出

1. 信息框函数

信息框函数（MsgBox）是常用的输出信息的函数，MsgBox函数在对话框中显示信息，等待用户单击按钮，并返回一个整数以标明用户单击了哪个按钮。其语法格式为：

变量= MsgBox（〈信息内容〉[,〈对话框类型〉[,〈对话框标题〉]]）

说明：

①〈信息内容〉指定在对话框中出现的文本，在信息内容中使用硬回车符（CHR(13)）可以使文本换行。对话框的高度和宽度随着信息内容的增加而增加，最多可有1024个字符。

②〈对话框类型〉指定对话框中出现的按钮和图标，一般有三个参数。

参数1 ——出现按钮

值常量说明

0 vbOKOnly 确定按钮

1 VbOKCancel 确定和取消按钮

2 VbAbortRetryIgnore 终止、重试和忽略按钮

3 VbYesNoCancel 是、否和取消按钮

4 VbYesNo 是和否按钮

5 VbRetryCancel 重试和取消按

参数2 ——图标类型

值常量说明

16 VbCritical 停止图标

32 VbQuestion 问号（？）图标

48 VbExclamation 感叹号（！）图标

VbInformation 信息图标

参数3 ——默认按钮

值常量说明

0 vbDefaultButton1 指定默认按钮为第一按钮

256 vbDefaultButton2 指定默认按钮为第二按钮

512 vbDefaultButton3 指定默认按钮为第三按钮

③〈对话框标题〉指定对话框的标题。下述代码将显示如图3-3所示的对话框：msg = MsgBox("请确认输入的数据是否正确！", 3 + 48 + 0, "数据检查")

④Msgbox( )返回的值指明了在对话框中选择哪一个按钮

Msgbox函数的返回值

返回值常量按钮

1 vbOK 确定按钮

2 vbCancel 取消按钮

3 vbAbort 终止按钮

4 vbRetry 重试按钮

5 vbIgnore 忽略按钮

6 vbYes 是

7 vbNo 否

⑥如果省略了某些可选项，必须加入相应的逗号分隔符。

⑦若不需要返回值，则可以使用MsgBox的命令形式：

MsgBox〈信息内容〉[,〈对话框类型〉[,〈对话框标题〉]]

MsgBox “输入有错，重输！”，3+48+0，“测试”

注：不赋值时，不加括号。

在程序运行的过程中，有时需要显示一些简单的信息如警告或错误等，此时可以利用“信息对话框”来显示这些内容。当用户接收到信息后，可以单击按钮来关闭对话框，并返回单击的按钮值。

2. 输入框函数

⏹输入框函数（InputBox）函数显示一个能接受用户输入的对话框，并返回

用户在对话框中输入的信息。

⏹其语法格式为：

⏹变量= InputBox（〈提示信息内容〉[,〈对话框标题〉][,〈默认内容〉]）

⏹说明：

①〈提示信息内容〉指定在对话框中出现的文本。在〈信息内容〉中使用硬回车符（CHR(13)）可以使文本换行。对话框的高度和宽度随着〈信息内容〉的增加而增加，最多可有1024个字符。

②〈对话框标题〉指定对话框的标题

③〈默认内容〉可以指定输入框的文本框中显示的默认文本。如果用户单击“确定”按钮，文本框中的文本（字符串）将返回到变量中，若用户单击“取消”按钮，返回的将是一个零长度的字符串。

下述代码将显示如图所示的输入框：

aa = InputBox("信息内容","对话框标题","默认内容")

注意：如果省略了某些可选项，必须加入相应的逗号分隔符。