Ver Mensaje Individual
  #1 (permalink)  
Antiguo 25/10/2012, 07:23
scvirus
 
Fecha de Ingreso: octubre-2012
Mensajes: 1
Antigüedad: 11 años, 10 meses
Puntos: 0
Pregunta Option button array problemita

Buenas dias

quiero interactuar con varios option button..
cree 2 arrays de optiones

Lo que quiero es que si presiono algun opcion del frame 1, use el valor correspondiente del listbox Precio Solo ... si hay algun option button del frame 2 presionado, use el valor correspondinte del listbox Precio Duo. (list1, list2, list3, list4)

Asi viceversa, con el Frame2 cada vez que presione una opcion
Hasta ahora solo logro hacerlo por separado

Creo que no es muy complicado.

Codigo:

Option Explicit
Dim A As Double
Dim B As Double

Private Sub Option1_Click(Index As Integer) '~~~ Control array

For A = 0 To 2
If Option1(A).Value = True Then
Label1.Caption = List1.List(A)
End If
Next A

For B = 0 To 2
If Option2(B).Value = True Then
Label2.Caption = List3.List(B)
End If
Next B

End Sub




Gracias

Última edición por scvirus; 25/10/2012 a las 07:33