admin 管理员组

文章数量: 1086019


2024年3月27日发(作者:少儿编程师资培训班)

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("信息内容","对话框标题","默认内容")

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


本文标签: 对话框 按钮 指定 用户 信息