オプションボタンの選択を確認する
オプションボタンの場合は複数の中から選択する場合がほとんどなので、コントロールを配列にします。これによってオプションボタンの名前は同じでも異なるインデックス(Index)を持つので、これによって選択されたオプションボタンを判断します。下のコードではラベル(Label1)に3つのオプションボタン(Option1)のうち、どれが選択されたかを表示しています。コントロールを配列にするいちばん簡単な方法は、コントロールをコピーして貼り付ける時に｢配列にしますか？｣と問われたときにそこで「はい」とすることです。
| Private Sub Option1_Click(Index
As Integer) Label1.Caption = "オプション" & Index + 1 & "が選択されました" End Sub |