2017年11月13日

【Access】オプションボタンのオプション値を取得する


オプションボタンのオプション値を取得する方法です。

たとえばこのようなオプショングループ(frameSex)内にオプションボタン(optionMale、optionFemale)があるとします。


このオプションボタンのオプション値を取得し、値によって性別をラベルに表示させるには次のように記述します。
Private Sub frameSex_Click()

    Select Case Me.frameSex.Value
    
        Case Me.optionMale.OptionValue
            
            Me.labelValue.Caption = "男"
            
        Case Me.optionFemale.OptionValue
        
            Me.labelValue.Caption = "女"
    
    End Select
    
End Sub
ポイントは、オプショングループのValueプロパティです。
オプションボタンを選択したときオプションボタンのオプション値がこのオプショングループのValueプロパティに格納されます。


実行結果







スポンサーリンク