MsgBox 分岐処理メッセージ
解説
「OK」ボタンと「Cancel」ボタンを使って処理を分けます。このように関数の戻り値を使用する場合は引数をかっこで囲みます。
使用例
次の例は「OK」ボタンが押された場合はそのまま終了します。「Cancel,」ボタンが押された場合はやり直しのメッセージと「警告」ボタンを追加して出しています。
Public Sub MsgBox_2()
If MsgBox("作業は終わりました。終了しますか?。", vbOKCancel, "確認") = vbOK Then
Exit Sub
Else
MsgBox "やり直してください", vbOKOnly + vbCritical, "確認"End If
End Sub
次はvbOKCancelボタンで表示されました。
OKボタンでは何も行いません。Cancelボタンが押されたときに次の表示になります。
このように分岐処理で使います。
(この項終わり)