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。

说明

如果同时提供了

helpfile 和

context，就会在对话框中自动添加“帮助”按钮。

如果用户单击

确定或按下

ENTER，则

InputBox 函数返回文本框中的内容。如果用户单击

取消，则函数返回一个零长度字符串 ("")。

下面例子利用

InputBox 函数显示一输入框并且把字符串赋值给输入变量：

Dim InputInput =

InputBox("输入名字"

) MsgBox ("输入：" & Input)