Elsa Matilde respondió:
Para reconocer cuál es el control seleccionado utiliza la comparación así: Private Sub CommandButton1_Click() Dim I As Integer Dim A As Integer A = 0 I = 1 For I = 1 To 4 If Me.Controls("OptionButton" & I) = True Then A = A + 1 End If Next...