InputBox是Visual Basic和VBS中的一种函数，功能是弹出一个对话框，在其中显示提示，等待用户输入文字并按下按钮来自，然后返回用户输入的文字。
- 外文名称 inputbox
- 释义 Visual Basic和VBS中的函数
- 语法 (Prompt[, Title] 等)
- 参数 Prompt等
- 类别 函数
简介
InputBox是Visual Basic和VBS中的函数，功能是弹出一个对话框，在其中显示提示，等待来自用户输入文字并按下按钮，然后返回用户输入的文字。右图就是InputBox函数的效果，其中展示了Inpu360百科tBox函数的三个重要参数Prompt、Title和Default的位置。该函数与胶密盐础菜MsgBox函数类似，区别就是InputBo似广采流底测决修变画x函数用于简单地接受用户输入的一些文本。
使用方法
语法
InputBox(Prompt,[Title],[Default],[XPos],[YPos],[Helpfile],[Context])
参数
手执尼距市分英 部分 | 描述 |
|---|---|
Prompt | 必需的。作为对话框消息出现的字符串表达式。Prompt的最大长度为南局业少营它富大约为1024个字符，由所用字符的宽度决定。如果Prompt的内容超过一行，则可以在每一行之间用回车符收一诗扩老知离孩品伯告(Chr(13))、换行符(Chr(10)语推变降等钱游独备改开)或是回车与换行符的组合(Chr(13) & Chr(10)，即vbCrLf)将各行分隔开来。 |
Title | 可选的。显示振预对话框标题栏中的字符串表达速式。如果省略，则把应用程序名放入标题栏中。 |
Default | 可选的。显示文本框中的字符串表达式，在用户输入前作为缺省值。如果省略，块因远受波跟须准代家教则文本框为空。 |
XP斗至扩异改os | 可选的。数值表达式，与YPos一起出现，指定对话框的左边与屏幕左边的水平距离。如果省略，则对话框会在水平方向居中。 |
YPos | 可选的。数值表达式，与XPos一起出现，指定对话框的顶端与屏幕顶端的距离。如果省略，则对话框被放置在屏幕垂直方向距底端大约三分之功增角大一的位置。 |
Helpfile | 挥然研概 可选的。字符串表达式，识别用来向对话框了提供上下文相关帮助的帮助文件。如果提供了Helpfile，则也必须提供Context。 |
Context | 可选的短波沉诉汉继今止冷染而。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了Context，则也必须提供Helpfile。 |
说明
如果同时提供了Helpfile与Context，规行弦财应游先组格用户可以按F1来查看与Context相应的帮助主题。某些主应用程序(支持使用Visual Basic for Applications的应用程序)，例如Microsoft 扩让高钱合答土流Excel，会在对话框中自动添加一个帮助按钮。如果用户单击确定或按下回车，则InputBox函数返回文本框中的内容。如果用户单击取消，则此函数返回一个长度为零的字符串("")。
在VB中，如果没有同时提供XPos和YPos，不会提示语法错误，但单独出现的XPos或YPos将被忽略，相当于省略了这两个参数。但在VBS中，单独出现的XPos续双死爱夜算常三约文或YPos会生效，但另一个没有确定的参数将使用默认值。
代码示例
右春些剂 '程序的作用是用InputBox函数输入2个数据之后，把他们连生封掌接起来，用MsgBox函数显示。
Private Sub Command1_Click()
Dim a As String, b As String
a = InputBox("输入第一个数据:")
b = InputBox("输入第来自二个数据:")
MsgBox a & b
End Sub
