ray88’s diary

お仕事で困ったとき用の自分用の覚書

Access VBA オプションボタンに関するプロパティ

■OptionValueプロパティはオプショングループ内のコントロールに割り当てられた数値です。グループ内のどのコントロールが選択されたか識別するのに用います。
【書式】

コントロール.OptionValue = 設定値

(例)

Private Sub btn7_Click() '[選択オプションの取得]ボタン
    Select Case Me.frm1.Value
    Case Me.opt1.OptionValue
        MsgBox "オプション1が選択されています"
    Case Me.opt2.OptionValue
        MsgBox "オプション2が選択されています"
    Case Me.opt3.OptionValue
        MsgBox "オプション3が選択されています"
    Case Else
        MsgBox "オプションが選択されていません"
    End Select
End Sub

f:id:ray88:20201121165346p:plain
f:id:ray88:20201121165405p:plain