msgboxの引数について調べているのですが・・・

私は現在四択の選択肢のある問題を制限時間内に解答する、というようなプログラムを作成しているのですがその中で解答の途中に問題を終了し結果を表示する「終了」というボタンを作成しました。

MsgBox("テストを終了しますか？", vbYesNo, "テスト終了")

終了ボタンをクリックしたら上記のようなにメッセージボックスを表示させたいのですが、この際”いいえ”のほうが選択されているのをディフォルトで設定したいのですが上記のプログラムにvbDefaultButton2？を設定すればいいのか？設定するとしてどこに記述すればいいのかわからなくなり質問しました。

知恵をかしてくださいよろしくお願いします。

No.1 ベストアンサー 回答者： kent_a 回答日時： 2009/11/11 15:36

vbYesNo + vbDefaultButton2 では？

この回答へのお礼

助かりました。ありがとうございます。

お礼日時：2009/12/04 14:59

No.2 回答者： trajaa 回答日時： 2009/11/11 15:39

このようなモノであれば、ヘルプでも見れば即座に理解できると思うが・・・

vbYesNo
の部分を
vbYesNo + vbDefaultButton2
にすればOK。

No.3 回答者： yone_sk 回答日時： 2009/11/11 15:49

ヘルプはご覧になりましたか？

（MsgBoxにカーソルを合わせてF1）

ヘルプには
--------------------------------
MsgBox(prompt[, buttons] [, title] [, helpfile, context])
～省略～
名前付き引数 buttons には、次の値のうち、該当する値の合計値を指定します。
～省略～
--------------------------------
とあります。

つまり、足せばOK
MsgBox("テストを終了しますか？", vbYesNo + vbDefaultButton2, "テスト終了")

ヘルプで調べたほうがネットで調べるより早いことは多々ありますので、ヘルプで調べる癖をつけましょう。

No.4 回答者： nda23 回答日時： 2009/11/11 15:51

ついでにvbQuestionも

Ctl = vbYesNo + vbDefaultButton2 + vbQuestion
Res = MsgBox("テストを終了しますか？", Ctl, "テスト終了")

No.5 回答者： imogasi 回答日時： 2009/11/11 16:04

質問に　vbDefaultButton2　の語句が出ているのに、Googleなどで

「vbDefaultButton2」でなぜ照会しないのかな。
http://homepage1.nifty.com/MADIA/vb/vb_bbs/20040 …
ほか多数記事がでる。
ーー
ついでにまだVB&やVBAの質問もあるので、VB.NET系であること、そのバージョンを書いておいてください。

No.6 回答者： YON56 回答日時： 2009/11/12 09:41

メッセージボックスに表示するボタンに、「特定のボタンを選択させたい」というryousuke33さんの気持ちはよく解りますが、ユーザーが選択するボタンにディフォルト設定することは出来ません。

人間には、「はい」と条件反射しがちな性質がありますから、メッセージの内容を工夫して、「はい」ボタンにて「テストを終了しない」というふうにするしかありません。
その他の方法として、工夫したユーザーフォームを作るとか、
もう一度 「本当に、テストを終了していいですか」と問うメッセージボックスを表示するとかがあります。