Plantear variable
Publicado por Cris (12 intervenciones) el 14/12/2018 21:56:15
Estoy tratando de hacer una variable, pero no doy con ello. Si podéis ayudarme os lo agradezco.
Tengo un randomize del 1 al 10, cuyo resultado aparece el LabelContar.caption
Tengo Label1, Label2 y Label3 (indexadas del 1 al 10 - Label1(1), Label1(2)…)
Y lo que pretendo es que, si sale el número 1 en LabelContar, Label1(1), Label2(1) y Label3(19, sean visibles.
Si sale el número 2, pues las 3 Labels que tenga index 2… y así sucesivamente.
El código que tengo y que no sé terminar es:
Gracias de antemano.
Tengo un randomize del 1 al 10, cuyo resultado aparece el LabelContar.caption
Tengo Label1, Label2 y Label3 (indexadas del 1 al 10 - Label1(1), Label1(2)…)
Y lo que pretendo es que, si sale el número 1 en LabelContar, Label1(1), Label2(1) y Label3(19, sean visibles.
Si sale el número 2, pues las 3 Labels que tenga index 2… y así sucesivamente.
El código que tengo y que no sé terminar es:
1
2
3
4
5
6
7
8
Dim a As Integer
a = Val (LabelContar.Caption)
For i = 0 To Me.Controls.count - 1
If TypeOf Me.Controls(i) Is Label and Me.Controls “aquí viene el problema ya que no se decir que label(Index) sea igual que a” Then
Me.Controls(i).Visible = True
End If
Next i
Gracias de antemano.
Valora esta pregunta
0
