第1个回答 2015-08-01
把每个Option的Name(名称)都写成同一个[这里假设名称都为Option1],这时VB会弹出对话框问是否创建控件数组,选择是即可。
接下来在其中一个单选按钮的Click事件中写如下代码。
Private Sub Option1_Click(Index As Integer)
If Option1(Index).Value = True Then
'Option1(Index).Value在VB中单选按钮是否被选中用此属性判断
MsgBox "您选择了"&Option1(Index).Caption
'读取选中了的单选框的Caption属性
End If
End Sub