Code Tips‎ > ‎

VBのMsgBoxとInputBox



MsgBox

ダイアログ ボックスにメッセージを表示します。ボタンがクリックされるのを待って、どのボタンがクリックされたのかを示す、整数型 (Integer) の値を返します。

MsgBox(Prompt, MsgBoxStyle, Title)


Prompt
必ず指定します。ダイアログ ボックス内にメッセージとして表示する文字列 (String) 式を指定します。Prompt に指定できる最大文字数は、1 バイト文字で約 1,024 文字です。ただし、使用する文字の文字幅に依存します。Prompt を複数行で構成する場合は、各行をキャリッジ リターン文字 (Chr(13))、ライン フィード文字 (Chr(10))、またはキャリッジ リターン文字とライン フィード文字の組み合わせ (Chr(13) & Chr(10)) を使って区切ります。

MsgBoxStyle
省略可能です。表示されるボタンの種類と個数、使用するアイコンのスタイル、標準ボタン、メッセージ ボックスがモーダルかどうかなど、それらを表す値の合計値を示す数式を指定します。MsgBoxStyle を省略すると、既定値は 0 になります。

Title
省略可能です。ダイアログ ボックスのタイトル バーに表示する文字列 (String) 式を指定します。Title を省略すると、タイトル バーにはアプリケーション名が表示されます。

第二引数(MsgBoxStyle)の値
MsgBoxStyle列挙型のメンバ VB6, VBS, VBAの定数 説明
OKOnly vbOKOnly 0 [OK] ボタンのみを表示します。
OKCancel vbOKCancel 1 [OK] ボタンと [キャンセル] ボタンを表示します。
AbortRetryIgnore vbAbortRetryIgnore 2 [中止]、[再試行]、および [無視] の 3 つのボタンを表示します。
YesNoCancel vbYesNoCancel 3 [はい]、[いいえ]、および [キャンセル] の 3 つのボタンを表示します。
YesNo vbYesNo 4 [はい] ボタンと [いいえ] ボタンを表示します。
RetryCancel vbRetryCancel 5 [再試行] ボタンと [キャンセル] ボタンを表示します。
Critical vbCritical 16 警告メッセージ アイコンを表示します。
Question vbQuestion 32 問い合わせメッセージ アイコンを表示します。?アイコン
Exclamation vbExclamation 48 注意メッセージ アイコンを表示します。!アイコン
Information vbInformation 64 情報メッセージ アイコンを表示します。「i」アイコン
DefaultButton1 vbDefaultButton1 0 第 1 ボタンを標準ボタンにします。
DefaultButton2 vbDefaultButton2 256 第 2 ボタンを標準ボタンにします。
DefaultButton3 vbDefaultButton3 512 第 3 ボタンを標準ボタンにします。
ApplicationModal ? 0 アプリケーションをモーダルに設定します。メッセージ ボックスに応答するまで、現在選択中のアプリケーションの実行を継続できません。
SystemModal ? 4096 システムをモーダルに設定します。メッセージ ボックスに応答するまで、すべてのアプリケーションが中断されます。
MsgBoxSetForeground ? 65536 最前面のウィンドウとして表示します。
MsgBoxRight ? 524288 テキストを右寄せで表示します。
MsgBoxRtlReading ? 1048576 ヘブライ語やアラビア語のシステムの場合、テキストを右から左の方向で表示します。

戻り値
MsgBoxResult列挙型のメンバ VB6, VBS, VBAの定数
OK vbOK 1
Cancel vbCancel 2
Abort vbAbort 3
Retry vbRetry 4
Ignore vbIgnore 5
Yes vbYes 6
No vbNo 7

MsgBox 関数 (Visual Basic) MSDN

InputBox

プログラムの実行中にユーザーから入力を受け付ける際に使用します。

InputBox関数
InputBox(Prompt, [Title], [Default], [XPos], [YPos], [HelpFile], [Context])


ExcelなどのVBAでInputBoxを使用する場合には、戻り値の型も指定できるInputBoxメソッドも使用できます。

InputBoxメソッド
Application.InputBox(Prompt, [Title], [Default], [XPos], [YPos], [HelpFile], [HelpContextId], [Type])

Typeに指定できる値。複数の型を指定する場合には加算します。Typeで指定した型に該当しない値が入力された場合には、入力エラーのダイアログが表示されます。
0 数式
1 数値
2 文字列
4 論理値(True/False)
8 セル参照(Rangeオブジェクト)
16 エラー値(#N/Aなど)
64 数値配列