WSH/メッセージボックスにアイコンを表示する方法

メッセージボックスにアイコンを表示する方法†

VBScriptのMsgBox関数で簡単にメッセージボックスを表示することができます。
MsgBoxに文字列を引数として渡すだけだと、下のメッセージダイアログボックスのように引数で渡した文字列とOKボタンが表示されます。

以下にMsgBox関数で警告やインフォメーションのアイコンを表示したりメッセージボックスのタイトルを指定する方法を以下に記します。

MsgBox関数の構文は以下のようになります。
メッセージ以外にアイコンの表示やYes/Noボタンにしたり、タイトルを表示することができます。

MsgBox ダイアログボックスに表示する文字列,ボタンの種類,ダイアログボックスのタイトル

MsgBoxの引数には他にもヘルプファイルの指定やコンテキスト番号を指定することもできます。
本資料ではヘルプファイルの指定およびコンテキスト番号の指定に関しては記述していません。

上記のボタンの種類について以下に記します。
ボタンの種類となっていますが、各種値を指定することにより警告やインフォメーションアイコンを表示することができます。

定数	値	説明
vbOKOnly	0	[OK] ボタンのみ表示
vbOKCancel	1	[OK] と [キャンセル] ボタンを表示
vbAbortRetryIgnore	2	[中止][再試行] [無視]の3つのボタンを表示
vbYesNoCancel	3	[はい][いいえ] [キャンセル] の 3 つのボタンを表示
vbYesNo	4	[はい] [いいえ] ボタンを表示
vbRetryCancel	5	[再試行] [キャンセル] ボタンを表示
vbCritical	16	警告メッセージアイコンを表示します。
vbQuestion	32	問い合わせメッセージアイコンの表示
vbExclamation	48	注意メッセージアイコンの表示
vbInformation	64	情報メッセージアイコンの表示
vbDefaultButton1	0	第1ボタンを標準ボタンにする
vbDefaultButton2	256	第2ボタンを標準ボタンにする
vbDefaultButton3	512	第3ボタンを標準ボタンにする
vbDefaultButton4	768	第4ボタンを標準ボタンにする(指定しても第4ボタンがないので無効になるようです)
vbApplicationModal	0	アプリケーションモーダルに設定する
vbSystemModal	4096	システムモーダルに設定する

以下にいくつかの実行例を記します。

タイトルの通り、Yes/Noボタンを表示して注意メッセージアイコンを表示する場合のコードです。
ボタンの種類であるvbYesNoと注意アイコンであるvbExclamationの値を足しています。

VBScript

' Yes/Noボタンを表示して注意メッセージアイコンを表示する
MsgBox "Yes/Noボタンを表示して注意メッセージアイコンを表示する", vbYesNo + vbExclamation

タイトルの通り、はい、いいえ、キャンセルボタンを表示し問合せアイコンを表示しキャンセルを標準ボタンにする場合のコードです。
ボタンの種類であるvbYesNoと注意アイコンであるvbExclamationの値を足しています。

VBScript

MsgBox "はい、いいえ、キャンセルボタンを表示し問合せアイコンを表示しキャンセルを標準ボタンにする", _
       vbYesNoCancel + vbQuestion + vbDefaultButton3

3つ目の引数にタイトル文字列を指定するとダイアログボックスにタイトルが表示されます。

ボタンがデフォルトでよい場合は上記VBScriptのように,,で省略できます。

MsgBox関数でボタンとアイコンを設定する場合には、上記の定数を足し算することにより実現することができます。
以上、VBScriptのMsgBoxでボタンの種類指定とメッセージアイコンを指定する方法でした。