VB中输入函数InputBox的用法

格式：InputBox（pronpt[,title][,default][,xpos,ypos]).其中的pronpt为窗口的提示词，title为输入窗口的标题，default为输入窗口的默认内容，xpos，ypos为窗口距离屏幕左边，上边的距离。

说明

如果同时提供了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