Ver Mensaje Individual
  #1 (permalink)  
Antiguo 20/02/2006, 18:39
LeandroA
 
Fecha de Ingreso: abril-2005
Mensajes: 351
Antigüedad: 19 años, 1 mes
Puntos: 3
Matriz de controles, problemas al elminar

Hola tengo un problema con arrays, yo estoy creando una matris de commandbuttons lo cuales los creo y los alineo uno al lado del otro en tiempo de ejecucion con un "for i ="
bien hasta hay todo bien el problema es que cuando elimino un y quiero volver a alinear los que quedan uno al lado del otro (pegaditos) ya no lo puedo alinear mas de esta manera, porque me da el error de que la matriz x no existe, entonses alguien conose una forma "elegante" de solucionar esto

eso es lo que tengo:

Cita:
Private Sub Form_Load()
For i = 1 To 10
Load Cmd(i)
Cmd(i).Visible = True
Next
Alinear
End Sub
Sub Alinear()
'El Cmd(0) no lo uso,esta invisible
For i = 1 To Cmd.Count - 1
Cmd(i).Left = Cmd(i - 1).Left + Cmd(0).Width
Next
End Sub

Private Sub Cmd_Click(Index As Integer)
Unload Cmd(Index)
Alinear
End Sub

Por las dudas aclaro,
pregunta (poque no descargar todos y cargar 9 en ves de 10)
Respuesta (porque esto lleva un pequeño tiempo,y no me sirve)


Bueno muchas gracias
y saludos