1=InputBox("请输入一个数字", "数学练习", 10, 100, 200, "使用帮助", 2)
2= InputBox("美丽七夕", "爱情絮语", 1314, 100, 800, "永恒的心", 8)
前3项容易明白，第4，第5个参数决定对话框出现的位置；第6项是帮助文件的名字，最后一项是相关内容在帮助文件中的序号。
InputBox是Visual Basic和VBS中的函数，功能是弹出一个对话框，在其中显示提示，等待用户输入文字并按下按钮，然后返回用户输入的文字。
InputBox函数的效果，其中展示了InputBox函数的三个重要参数Prompt、Title和Default的位置。该函数与MsgBox函数类似，区别就是InputBox函数用于简单地接受用户输入的一些文本。
扩展资料
如果同时提供了Helpfile与Context，用户可以按F1来查看与Context相应的帮助主题。某些主应用程序（支持使用Visual Basic for Applications的应用程序），例如Microsoft Excel，会在对话框中自动添加一个帮助按钮。如果用户单击确定或按下回车，则InputBox函数返回文本框中的内容。如果用户单击取消，则此函数返回一个长度为零的字符串（""）。
在VB中，如果没有同时提供XPos和YPos，不会提示语法错误，但单独出现的XPos或YPos将被忽略，相当于省略了这两个参数。但在VBS中，单独出现的XPos或YPos会生效，但另一个没有确定的参数将使用默认值。
参考资料来源：百度百科-inputbox
l1=InputBox("请输入一个数字", "数学练习", 10, 100, 200, "使用帮助", 2)
l2= InputBox("美丽七夕", "爱情絮语", 1314, 100, 800, "永恒的心", 8)
前3项容易明白，第4，第5个参数决定对话框出现的位置；第6项是帮助文件的名字，最后一项是相关内容在帮助文件中的序号。
怎么设置如果单击确定则出现什么 取消呢
第三项就是默认值（也叫缺省值），也就是不输入时的值。比如上图中，直接点“确定”，则L1的值为10.
如果这个值也被删除了，即输入框中是空的，那么得到的是一个空字符串。
dim intC as IString
intC=InputBox("请输入一个数字", "数学练习")
这种情况下直接点击“确定”，intC的值为空。
语法：
语法
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
下面用一个具体例子：
最后的帮助文件，我就是在自己电脑里找了一个，复制到本工程文件同一个文件夹，最后的0 是该帮助文件可以用的序号。
0如果不输入的话 会怎么样
最后两个参数，必须同时使用
