Visual Basic - Agregar controles

Hola. Me gustaría saber cómo puedo agregar controles dinámicamente a un formulario mediante código. Por ejemplo añadir etiquetas (Label) a un formulario dentro de una matriz (o coleccion) de controles conforme el usuario vaya añadiendo nuevas opciones. Es decir ¿puedo crear instancias de Label sin haber creado ninguna? Se debe de poder, el problema es ¿como? Agradeceria codigo de ejemplo. MUCHAS GRACIAS.

Sí se puede, y es muy fácil. Primero tienes que tener un Label cuya propiedad Index sea 0 para convertirlo en una matriz de controles. A partir de aquí:

Load lblEtiqueta(NuevoElemento)

Donde NuevoElemento es el índice que tendrá el elemento que estás cargando, es decir, si ya tienes uno con la propiedad Index=0, el nuevo debe ser 1, el siguiente 2, el siguiente 3... Por supuesto, puedes (y debes) usar una variable para indicar el índice.

Lo único que tienes que tener en cuenta es lo siguiente: al cargar un control en una matriz con la instrucción Load, el control que se cargue heredará el valor de todas las propiedades del elemento de la matriz cuyo valor Index sea más bajo (normalmente el 0), excepto la propiedad Index (por razones obvias) y la propiedad Visible, que siempre será False. Esto se hace así para que puedas colocar primero el control donde quieras y luego mostrarlo.

Un saludo

Perdona mi ignorancia, pero no se cuando te refieres que tengo que agregar el control inicial. ¿te refieres a hacerlo de forma visual o por codigo? Para mi lo ideal seria hacerlo por codigo. Yo concretamente declaro una variable label y luego mediante el metodo de commands.add inserto la etiqueta en un frame. El problema es que luego no puedo modificar la propiedad index de la etiqueta porque me dice que es de solo lectura. Con lo cual no hay vector de etiquetas, que es lo que me interesa. Por otro lado considero muy interesante que no tenga que insertar ninguna etiqueta en el proyecto de forma visual.

Muchas gracias.

Perdón por la tardanza.

Efectivamente, con Controls.Add puedes crear controles dinámicamente, pero no matrices de controles. Sí podrías declarar una variable como una matriz y meter los controles en esta, pero la pega es que no podrías usar sus eventos, ya que no se pueden declarar matrices WithEvents:

Private NuevoControl() as Label

Private Sub CrearControl
Static intContador as Integer

ReDim NuevoControl(intContador)

Set NuevoControl(intContador)=Me.Controls.Add("VB.Label", "lbl" & Cstr(intContador))

With NuevoControl(intContador)
.Left=lo que sea
.Top=lo que sea
.Visible=True
End With

intContador=intContador+1

End Sub

Pero, como te digo, no podrías usar los eventos de los nuevos controles, por eso lo mejor es hacerlo como te decía.

Por cierto, cuando digo el control inicial, quiero decir en tiempo de diseño (o en forma visual, que es lo mismo). No hay otro modo.

Un saludo

Ya lo he solucionado. Al final he optado por usar un control inicial invisible y a partir de este genero la matriz, como me dijiste.

Muchas gracias.