Cita:
Iniciado por fedefrankk 
Hola claro eso es lo que no se hacer, pero gracias porque ya se por donde buscar, tengo que buscar lo que es un array...
si tenes algun ejemplo vienvenido sino no importa, muchas gracia por tu tiempo
1º. Creas un array de 15 controles Picture
¿cómo? Pegas en el Form un control Picture (nombre por defecto = Picture1. Te posicionas sobre él y con el botón derecho del ratón seleccionas 'Copiar' y a continuación 'Pegar'; saldrá un mensaje preguntando si quieres crear un array de controles, aceptas y verás que el nombre ha cambiado a Picture1(0), vuelves a darle otra vez a 'Pegar' hasta el control nº 15 (Picture1(14)). Mueves cada control a la posición deseada en el form.
2º Haces lo mismo con el Label5
Ya tienes 15 controles Picture1 (Picture1(0)...Picture1(14)) y 15 controles Label5 (Label5(0)...Label5(14))
Cada índice del Picture1 se corresponde con el índice del Label5.
Y ahora el siguiente
Código:
Private Sub Text3_Change()
Dim i As Integer
' primero ponemos todos visible a False
For i = 0 To Picture1.UBound
Picture1(i).Visible = False
Label5(i).Visible = False
Next i
' controlamos que no se escriba un numero superior al límite del array
If Val(Text3.Text) > Picture1.Count Then
MsgBox "El número debe estar entre 1 y " & Picture1.Count
Text3.Text = ""
Exit Sub
End If
' ahora hacemos visible los que se indiquen en el TextBox
For i = 0 To Val(Text3.Text) - 1
Picture1(i).Visible = True
Label5(i).Visible = True
Next i
End Sub
