在对话框中显示提示,等待用户输入文本或单击按钮,并返回包含文本框内容的字符串。
语法
InputBox ( 提示 [, title ] [, default ] [, xpos ] [, ypos ] [, helpfile ] [, context ] )
InputBox 函数语法具有以下参数:
参数 |
说明 |
---|---|
提示 |
必需。 在对话框中显示为消息的字符串表达式。 提示符的最大长度约为 1024 个字符,具体取决于所用字符的宽度。 如果 prompt 包含多行, 可以使用回车符 (Chr (13) ) 、 (Chr (10) ) 的换行符或回车符组合 (Chr (13) & Chr (10) ) 来分隔各行。 |
标题 |
可选。 显示在对话框标题栏中的字符串表达式。 如果省略 标题,应用程序名称将放在标题栏中。 |
默认 |
可选。 如果未提供其他输入,则文本框中显示为默认响应的字符串表达式。 如果省略 默认值,文本框将显示为空。 |
xpos |
可选。 数值表达式,以 twips 为单位指定对话框左边缘与屏幕左边缘的水平距离。 如果省略 xpos ,对话框将水平居中。 |
ypos |
可选。 数值表达式,以 twips 为单位指定对话框上边缘与屏幕顶部的垂直距离。 如果省略 了 ypos ,对话框将垂直定位到屏幕下约三分之一的位置。 |
helpfile |
可选。 标识要用于为对话框提供上下文相关帮助的帮助文件的字符串表达式。 如果提供了 helpfile ,还必须提供 上下文 。 |
context |
可选。 由帮助作者分配给相应帮助主题的帮助上下文编号的数值表达式。 如果提供了 上下文 ,还必须提供 helpfile 。 |
备注
同时提供帮助文件和上下文后,用户可以按 F1 (Windows) 或 HELP (Macintosh) 查看与上下文对应的帮助主题。 某些 主机应用程序 还会自动向对话框添加 “帮助 ”按钮。 如果用户单击“ 确定” 或按 Enter, 则 InputBox 函数将返回文本框中的任何内容。 如果用户单击“ 取消”,该函数将返回零长度字符串 (“”) 。
注意: 若要指定超过第一个命名参数,必须在 表达式 中使用 InputBox 。 若要省略某些位置参数,必须包含相应的逗号分隔符。
示例
注意: 以下示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息,请在搜索旁边的下拉列表中选择“开发人员参考”,并在搜索框中输入一个或多个术语。
此示例演示使用 InputBox 函数提示用户输入值的各种方法。 如果省略 x 和 y 位置,则对话框将自动为相应轴居中。 如果用户单击 “确定” 或按 ENTER 键,则变量 MyValue 包含用户输入的值。 如果用户单击“ 取消”,则会返回长度为零的字符串。
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' Set prompt.
Title = "InputBox Demo" ' Set title.
Default = "1" ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
' Use Helpfile and context.
' The Help button is added automatically.
MyValue = InputBox(Message, Title,,,,"DEMO.HLP", 10)
' Display dialog box at position 100, 100.
MyValue = InputBox(Message, Title, Default, 100, 100)