InputBox 函数

显示一个提示对话框，用户可以在其中输入文字。输入将被指定给变量。

使用「InputBox」语句是通过对话框输入文字的一种便捷方法。点击「确定」或按 Enter 键可以确认输入的内容。输入将作为函数返回值进行返回。如果使用「取消」关闭对话框，「InputBox」将返回一个长度为零的字符串 ("")。

语法:


InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])

返回值:

字符串

参数:

「Msg」: 字符串表达式，即在对话框中显示的消息。

「Title」: 对话框标题栏中显示的字符串表达式。

「Default」: 默认情况下 (即用户未输入内容)，在文本框中显示的字符串表达式。

「x_pos」: 用于指定对话框水平位置的整数表达式。此位置使用绝对坐标，不参照办公软件应用程序的窗口。

「y_pos」: 用于指定对话框垂直位置的整数表达式。此位置使用绝对坐标，不参照 Office 应用程序的窗口。

如果省略「x_pos」和「y_pos」参数，对话框将显示在屏幕的中心位置，具体位置在 twips 中指定。

示例:


Sub ExampleInputBox
Dim sText As String
    sText = InputBox ("请输入词语: ","亲爱的用户")
    MsgBox ( sText , 64, "词组确认")
End Sub

请支持我们!