InputBox

显示输入对话框。等待用户输入文本或单击按钮，并返回输入内容。

格式
InputBox 提示符, 标题, 默认值, 输入字符串

参数

提示符

显示到对话框的信息的字符串

标题

显示到对话框标题栏的字符串

默认

文本框中默认显示的字符串未设置默认值时，设为空白。(" ")

输入字符串

设置用户输入的字符串的字符串型变量如果用户单击取消，此变量将被设为“@”。

说明
InputBox显示对话框，等待至用户单击[OK]按钮或[取消]按钮。在参数输入字符串中将设置用户输入的字符串。

参阅
MsgBox

InputBox使用示例
此程序为InputBox语句的使用示例。

Function GetPartName$ As String
    String prompt$, title$, answer$

    prompt$ = "Enter " + Chr$(34) + "part name" + Chr$(34) + ":"
    title$ = "Sample Application"
    InputBox prompt$, title$, "", answer$
    If answer$ <> "@" Then
        GetPartName$ = answer$
    EndIf
Fend

下图为上述程序示例的结果。

限制事项
如果参数的提示、标题和默认值中包含半角逗号“,”，将无法正确显示字符串。请使用不含半角逗号的字符串。