在对话框中显示提示,等待用户输入文本或单击按钮,然后返回包含文本框内容的字符串。

语法

InputBox ( prompt [ ,title ] [ ,default ] [xpos ] [ypos ] [helpfile ] [ ,context ] )

InputBox函数语法具有以下参数:

参数

说明

prompt

必需。 在对话框中显示为消息的字符串表达式。 提示的最大 长度约为 1024 个字符,具体取决于所使用的字符的宽度。 如果提示由多行组成, 可以使用回车符 (Chr (13) ) 、行源字符 (Chr (10) ) 或每行之间使用回车回车符组合 (Chr (13) & Chr (10) ) 分隔线条。

title

可选。 显示在对话框标题栏中的字符串表达式。 如果省略 标题,应用程序名称将放置在标题栏中。

默认

可选。 如果未提供其他输入,则文本框中显示为默认响应的字符串表达式。 如果省略 默认值,文本框将显示为空。

xpos

可选。 数字表达式,以 twips 格式指定对话框左边缘与屏幕左边缘的水平距离。 如果 省略 xpos, 对话框将水平居中。

ypos

可选。 数字表达式,以 twips 格式指定对话框上边缘与屏幕顶部的垂直距离。 如果 省略 ypos, 对话框将垂直放置到屏幕向下的大约三分之一处。

helpfile

可选。 用于标识用于为对话框提供上下文相关帮助的帮助文件的字符串表达式。 如果 提供了 帮助文件, 则还必须 提供上下文。

上下文

可选。 数字表达式,即帮助作者分配给相应帮助主题的帮助上下文编号。 如果 提供了 上下文, 还必须提供 帮助文件。


备注

当同时提供帮助文件与上下文时,用户可以按 F1 (Windows) 或 HELP (Macintosh) 查看与上下文对应的帮助主题。 某些 主机应用程序 (例如 Microsoft Office Excel 2007 )会自动向对话框添加"帮助"按钮。 如果用户单击"确定"或按 Enter,InputBox 函数将返回文本框中的内容。 如果用户 单击"取消",函数将返回零长度字符串 (") 。

注意: 若要指定超过第一个命名参数,必须在一个 函数中表达式 。 若要省略某些位置参数,必须包含相应的逗号分隔符。

示例

注意: 以下示例演示了在 VBA Visual Basic for Applications (模块) 函数。 有关使用 VBA 的信息,请在"搜索"旁边的下拉列表中选择"开发人员参考",在搜索框中输入一个或多个术语。

此示例演示了使用 InputBox 函数提示用户输入值的各种方法。 如果省略 x 和 y 位置,则相应轴的对话框会自动居中。 变量 MyValue 包含用户在单击"确定"或按 Enter 键时输入的值。 如果用户单击 "取消",则返回零长度字符串。

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)

需要更多帮助?

扩展你的技能
了解培训

此信息是否有帮助?

你对翻译质量的满意程度如何?
哪些因素影响了你的体验?

谢谢您的反馈意见!

×