メッセージボックスでの選択から次の処理を決めるには？ (ID:123468)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 MsgBox の戻り値を変数に受けてみて下さい。 [VB6.0] Dim wAns As VbMsgBoxResult wAns = MsgBox("ok?", vbYesNo) Select Case wAns Case VbMsgBoxResult.vbYes MsgBox "Yes!" Case VbMsgBoxResult.vbNo MsgBox "No!" End Select