模块
目录
索引 🔎︎

# 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