不要單純考慮 Iif, 其實使用 RadioButton 大多是處理同一個組裏的 RadioButton 數組
這時可以使用Tag 屬性來存儲特定的值, 而不必再使用 IIf 去判斷
例如, 同一個組 Option1 有三個 OptionButton, Caption 分別是 男, 女, 不限
這時可以使用第 1 個(或其餘兩個) optionButton 的 Tag 屬性來存儲值
初始化(在 Load 事件)
Option1(0).Value = True
Option1(0).Tag = Option1(0).Caption

在處理 Option1_Click 事件時, 根據用戶點擊的索引來改變 Tag 值
Private Sub Option1_Click(Index As Integer)
Option1(0).Tag = Option1(Index).Caption
End Sub


如此, 在要得到 Option1 的值的地方直接可以使用 Option1(0).Tag 而不用 IIf 去判斷
例如
Debug.Print "你的性別是: " & Option1(0).Tag

[此贴子已经被作者于2007-10-22 10:38:03编辑过]

Private Sub Command1_Click()
MsgBox Option1(0).Tag
End Sub

Private Sub Form_Load()
Option1(0).Value = True
Option1(0).Tag = Option1(0).Caption
End Sub

Private Sub Option1_Click(Index As Integer)
Option1(0).Tag = Option1(intex).Caption
End Sub

始终显示的是第一个单选内容！option1(0).tag

我用这个方法写的代码，但是我选第二或者第三个单选框，打印出来的结果都还是第一个单选框的内容！下面是我的代码：

Private Sub Command1_Click()
MsgBox Option1(0).Tag
End Sub

Private Sub Form_Load()
Option1(0).Value = True
Option1(0).Tag = Option1(0).Caption
End Sub

Private Sub Option1_Click(Index As Integer)
Option1(0).Tag = Option1(intex).Caption
End Sub

打印结果始终显示的是第一个单选内容！

请指教