■メッセージボックスを表示(第2パラメーターを指定することで、注意マークなどを表示可能)

MsgBox "メッセージ", vbOKOnly + vbExclamation , "タイトル"

※ メッセージを複数行に設定したい場合は、文字列内に、VbCrLf (改行)を挿入
  例: "一行目" & VbCrLf & "2行目"

 第2パラメータ一覧 (パラメータは数値を足していく事で、複数選択可)
組み込み定数 内容  
vbOKOnly 0 ボタン : [OK]  
vbOKCancel 1 ボタン : [OK]、[キャンセル]  
vbAbortRetryIgnore 2 ボタン : [中止]、[再試行]、[無視]  
vbYesNoCancel 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 ボタンへ  
vbApplicationModal 0 メッセージボックスが閉じるまでAccessは一時ストップ (既定値)  
vbSystemModal 4096 メッセージボックスをWindowsの画面最前へ表示し、
メッセージボックスが閉じるまで全てのアプリケーションは一時ストップ。
 
vbMsgBoxHelpButton 16384 ヘルプ ボタンを追加します。  
VbMsgBoxSetForeground 65536 アクセスアプリケーション内で最前面に表示します。あまり意味無い?  
vbMsgBoxRight 524288 テキストを右寄せで表示します。使わない?  
vbMsgBoxRtlReading 1048576 テキストを、右から左の方向で表示します。使わない?  

■メッセージボックスを表示し、押されたボタンを判定

If MsgBox("続けますか?", vbOKCancel) = vbCancel Then Exit Sub

組み込み定数 内容
vbOK 1 [OK]
vbCancel 2 [キャンセル]
vbAbort 3 [中止]
vbRetry 4 [再試行]
vbIgnore 5 [無視]
vbYes 6 [はい]
vbNo 7 [いいえ]