¥H¤U¬OFOR+IF°j°é·íTrueªº®ÉÔ°µ~
For i = 19 To 36
If Controls("OptionButton" & i) = True Then
TextBox1 = TextBox1 & " " & Controls("OptionButton" & i).Caption & "¡q" & CommandButton9.Caption & "¡r"
Controls("OptionButton" & i).Value = False
Exit For
End If
Next i
¨º¦pªG³£OptionButton³£¨S¦³³Q¿ï¨úªº®ÉÔ°µ~§Ú¸Ó«ç»ò¼g?
§Ú¦Û¦æ§ï¼g«á~¥¢±Ñ~¦p¤U
For i = 19 To 36
If Controls("OptionButton" & i) = True Then
TextBox1 = TextBox1 & " " & Controls("OptionButton" & i).Caption & "¡q" & CommandButton9.Caption & "¡r"
Controls("OptionButton" & i).Value = False
Exit For
Else
TextBox1 = CommandButton9.Caption
End If
Next i