銀河鉄道

【VBA】OKキャンセルのメッセージボックス|MsgOKCancel

サムネイル
OKキャンセルメッセージ

OKが押されたらtrue/キャンセルが押されたらfalseを返す

' -----------------------------------------------------------------------
' 引数          : text:メッセージボックスのメイン文章/title:見出し
' -----------------------------------------------------------------------
Public Function MsgOKCancel( _
                                                ByVal text As String, _
                                                ByVal title As String) As Boolean
    MsgOKCancel = MsgBox(text, vbOKCancel, title)
End Function

ボタンとアイコンの組み合わせ例

vbOKCancel + vbCritical '警告
vbYesNo + vbQuestion '質問
vbOKOnly + vbExclamation '注意
vbAbortRetryIgnore + vbQuestion

関連記事

著者

author
月うさぎ

編集後記:
この記事の内容がベストではないかもしれません。

記事一覧