InputBox

入力ダイアログボックスを表示します。ユーザーがテキストに入力するか、またはボタンをクリックするまで待ち、入力した内容を返します。

書式
InputBox プロンプト, タイトル, デフォルト, 入力文字列

パラメーター

プロンプト
ダイアログボックスに表示するメッセージの文字列
タイトル
ダイアログボックスのタイトルバーに表示する文字列
デフォルト
テキストボックスにデフォルトで表示する文字列デフォルト値を設定しない場合は、空白を設定します。 (" ")
入力文字列
ユーザーが入力した文字列をセットする文字列型の変数ユーザーがキャンセルをクリックした場合は、この変数に "@"がセットされます。

解説
InputBox はダイアログボックスを表示し、ユーザーが[OK]ボタン、または[キャンセル]ボタンをクリックするまで待機します。パラメーターの入力文字列に、ユーザーが入力した文字列がセットされます。

参照
MsgBox

InputBox使用例
このプログラムはInputBoxステートメントの使用例です。

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

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

次の図は前記のプログラム例の結果です。

制限事項

  • パラメーターのプロンプト、タイトル、およびデフォルトに、半角カンマ","が含まれる場合、文字列が正しく表示できません。半角カンマを含まない文字列をご使用ください。
  • 入力文字列が”@”の場合、キャンセルと判別できません。