Access チェックボックスにチェックを入れないとメッセージ表示

Question

いつもお世話になっております。

色々と調べてみたのですが

参考になるものが見つけられなかったので

質問させて下さい。

チェックボックス「A」

チェックボックス「B」と

フォームに２つのチェックボックスがあります。

「A」または「B」のどちから、

もしくは「A」「B」の両方をチェックしないと

メッセージを「A、Bまたは両方にチェックを入れて下さい」と

メッセージを出すにはVBでどのようにしたらよろしいでしょうか。

ご教示頂けたらと思います。

よろしくお願い致します。

使用環境

Access2003(XP),Access2010(Win7)

Answer 1

こんばんは、MukkuMukuです。

チェックボックスの値は、True(-1)もしくはFalse（0）およびNullになるから、

    If Not (Me.チェック1 Or Me.チェック0) Then

        MsgBox "message"

    End If

とか

    If Me.チェック0 + Me.チェック1 = 0 Then

        MsgBox "message"

    End If

トリプルステートがある場合は、Nz関数を使う感じで

Answer 2

MukkuMuku　様

いつも教えて頂き、本当にありがとうございます。

Private Sub Form_BeforeUpdate(Cancel As Integer)

    If Not (Me.チェックA Or Me.チェックB) Then

        MsgBox "「A、Bのどちらか、または両方を選択して下さい」"

        Cancel = True

    End If

End Sub

で解決致しました！本当に勉強になります。

どうもありがとうございました。