メッセージボックスの引数には、「ボタンの種類」、「アイコンの種類」、「標準ボタン」などの設定があります。
ここではいろいろと試してみたいと思います。
| スポンサードリンク |
| ans = MsgBox("よろしいですか?", vbAbortRetryIgnore) | |
 「中止ボタン」でvbAbort（3）が返ります 「再試行ボタン」でvbRetry（4）が返ります 「中止ボタン」でvbIgnorel（5）が返ります |
|
| ans = MsgBox("よろしいですか?", vbApplicationModal) | |
 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbCritical) | |
 警告アイコンが表示されます。 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbDefaultButton1) | |
 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbDefaultButton2) | |
 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbDefaultButton3) | |
 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbDefaultButton4) | |
 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbExclamation) | |
 注意アイコンが表示されます 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbInformation) | |
 情報アイコンが表示されます 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbMsgBoxHelpButton) | |
 「OKボタン」でvbok（1）が返ります 「ヘルプボタン」でvbok（1）が返りますが、フォームは閉じません |
|
| ans = MsgBox("よろしいですか?", vbMsgBoxRight) | |
 メッセージが右寄せで表示されます。 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbMsgBoxRtlReading) | |
 メッセージを右から左の方向で表示しますとありますが、日本版では使えないようです。 「OKボタン」でvbok（1）が返ります |
|
| ans = MsgBox("よろしいですか?", vbMsgBoxSetForeground) | |
 最前面のウィンドウとして表示します。 「OKボタン」でvbok（1）が返ります |
|