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

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

例

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


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

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

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プロパティに格納されます。


実行結果

スポンサーリンク

https://hosopro.blogspot.com/2017/11/access-vba-option-group.html 【Access】オプションボタンのオプション値を取得する