VBS教程:函数-InputBox 函数

时间:2022-09-21 20:43:06

InputBox 函数

在对话框中显示提示,等待用户输入文本或单击按钮,并返回文本框内容。

InputBox(prompt[,
title][,default][,xpos][,ypos][,helpfile,context])

参数

prompt

字符串表达式,作为消息显示在对话框中。prompt 的最大长度大约是 1024 个字符,这取决于所使用的字符的宽度。如果 prompt 中包含多个行,则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 以分隔各行。

Title

显示在对话框标题栏中的字符串表达式。如果省略 title,则应用程序的名称将显示在标题栏中。

Default

显示在文本框中的字符串表达式,在没有其它输入时作为默认的响应值。如果省略 default,则文本框为空。

Xpos

数值表达式,用于指定对话框的左边缘与屏幕左边缘的水平距离(单位为缇)。如果省略 xpos,则对话框会在水平方向居中。

Ypos

数值表达式,用于指定对话框的上边缘与屏幕上边缘的垂直距离(单位为缇)。如果省略 ypos,则对话框显示在屏幕垂直方向距下边缘大约三分之一处。

Helpfile

字符串表达式,用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile,则必须提供 context

Context

数值表达式,用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context,则必须提供 helpfile

说明

如果同时提供了 helpfilecontext,就会在对话框中自动添加“帮助”按钮。

如果用户单击确定或按下 ENTER,则 InputBox 函数返回文本框中的内容。如果用户单击取消,则函数返回一个零长度字符串 ("")。

下面例子利用 InputBox 函数显示一输入框并且把字符串赋值给输入变量:

Dim InputInput = InputBox("输入名字") MsgBox ("输入:" & Input)