MsgBox 関数

Access デスクトップ データベースでは、 MsgBox 関数はダイアログ ボックスにメッセージを表示し、ユーザーがボタンを選択するのを待機し、ユーザーがどのボタンを選択したかを示す Integer を返します。

構文

MsgBox(prompt[, buttons][, title][, helpfile][, context])

MsgBox 関数の構文には、次の引数があります。

引数	説明
prompt	必ず指定します。 ダイアログ ボックスにメッセージとして表示される文字列式。 promptの最大の長さは、使用する文字の幅に応じて約 1024 文字です。 promptに複数の行がある場合は、各行の間に復帰文字 (Chr(13))、改行文字 (Chr(10))、または復帰と改行の組み合わせ (Chr(13) & Chr(10)) を使用して行を区切ることができます。
buttons	省略可能です。 表示するボタンの数と種類、使用するアイコン スタイル、既定のボタンの ID、およびメッセージ ボックスの形式を指定する値の合計である数値式。 省略した場合、 buttons の既定値は 0 になります。
title	省略可能。 ダイアログ ボックスのタイトル バーに表示する文字列式を指定します。 titleを省略すると、アプリケーション名がタイトル バーに表示されます。
helpfile	省略可能。 ダイアログ ボックスに状況依存のヘルプを設定するために、使用するヘルプ ファイルを識別する文字列式を指定します。 helpfileが指定されている場合は、contextも指定する必要があります。
context	省略可能。 ヘルプ作成者が該当するヘルプ トピックに割り当てたヘルプ コンテキスト番号を表す数式を指定します。 contextが指定されている場合は、helpfileも指定する必要があります。

設定

buttons引数の設定は次のとおりです。

定数	値	説明
vbOKOnly	0	[ OK ] のみ表示されます。
vbOKCancel	1	[ OK ] と [ キャンセル] の順に表示します。
vbAbortRetryIgnore	2	中止、再試行、無視の表示。
vbYesNoCancel	3	[はい]、[いいえ]、[キャンセル] の順に表示します。
vbYesNo	4	[はい] と [いいえ] と表示します。
vbRetryCancel	5	[ 再試行 と キャンセル] を表示します。
vbCritical	16	クリティカル メッセージ アイコンを表示する。
vbQuestion	32	警告クエリ アイコンを表示します。
vbExclamation	48	警告メッセージ アイコンを表示します。
vbInformation	64	インフォメーション メッセージ アイコンを表示します。
vbDefaultButton1	0	最初のボタンを既定にします。
vbDefaultButton2	256	2 番目のボタンを既定にします。
vbDefaultButton3	512	3 番目のボタンを既定にします。
vbDefaultButton4	768	4 番目のボタンを既定にします。
vbApplicationModal	0	アプリケーション モーダル。 ユーザーは、現在のアプリケーションで作業を続行する前に、メッセージ ボックスに応答する必要があります。
vbSystemModal	4096	システム モーダル。 ユーザーがメッセージ ボックスに応答するまで、すべてのアプリケーションが中断されます。
vbMsgBoxHelpButton	16384	メッセージ ボックスに [ヘルプ ] ボタンを追加します。
VbMsgBoxSetForeground	65536	メッセージ ボックス ウィンドウを前景ウィンドウとして指定します。
vbMsgBoxRight	524288	文字列を右揃えにする。
vbMsgBoxRtlReading	1048576	ヘブライ語やアラビア語のシステムでは、右から左の読み上げでテキストを表示するようにします。

値の最初のグループ (0 から 5) は、ダイアログ ボックスに表示されるボタンの数と種類を示します。 2 番目のグループ (16、 32、 48、 64) は、アイコンのスタイルを表します。 3 番目のグループ (0、 256、 512) は、どのボタンが既定であるかを決定します。 4 番目のグループ (0、 4096) は、メッセージ ボックスのモダリティを決定します。 数値を加算して buttons 引数の最終値を作成する場合は、各グループから 1 つの数値のみを使用します。

戻り値

定数	値	説明
vbOK	1	OK
vbCancel	2	キャンセル
vbAbort	3	中止
vbRetry	4	再試行
vbIgnore	5	無視
vbYes	6	はい
vbNo	7	いいえ

解説

helpfileとcontextの両方が提供されている場合、ユーザーは Windows の F1 キーまたは macOS のヘルプ キーを押して、context一致するヘルプ トピックを表示できます。 Microsoft Excel などの一部のホスト アプリケーションでは、ダイアログ ボックスに [ヘルプ ] ボタンが自動的に追加されます。

ダイアログ ボックスに [キャンセル] ボタンが表示される場合、 Esc キーを押すと、[ キャンセル] を選択するのと同じ効果があります。 ダイアログ ボックスに [ヘルプ] ボタンがある場合、ダイアログ ボックスで状況依存ヘルプを使用できます。 ただし、ユーザーが他のボタンのいずれかを選択するまで、値は返されません。

例

この例では、 MsgBox 関数を使用して、[ はい ] ボタンと [いいえ ] ボタンのあるダイアログ ボックスに重大なエラー メッセージを表示します。 既定の応答として [ いいえ] ボタンが指定されています。 MsgBox 関数によって返される値は、ユーザーが選択するボタンによって異なります。 この例では、 DEMO.HLP がヘルプ コンテキスト番号が 1000 に等しいトピックを含むヘルプ ファイルであることを想定しています。

Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"    ' Perform some action.
Else    ' User chose No.
    MyString = "No"    ' Perform some action.
End If