Hola.
Necesito diseñar una aplicación que necesita crear controles en tiempo de ejecución a la carga del formulario principal (en concreto son textbox)
Hasta ahí no he tenido problema. El problema me surge porque, posteriormente, debo referirme a esos mismos controles para cambiarles su contenido durante cualquier momento de la ejecución del programa. Lo que ocurre es que no puedo hacer referencia a ellos, no me lo permite.
Para más datos señalaré que los textbox dinámicos los he creado mediante un bucle For y después he modificado las propiedades de cada uno de ellos con un With.
A pesar de que me le he indicado la propiedad .Name no me permite después hacer referencia a ellos.
¿Alguien puede echarme un cable con esto?
Gracias de antemano

porque no pruebas esto:


por ejemplo estas creando tus controles algo asi

Dim Botones(10) as button
dim NuevoBoton as button

for i=0 to 10
nuevoboton=new button'y todo lo demas que requieras no
'ahora prueba
botones(i)=nuevoboton

next

entonces ya podrás dirigirte a tus cajas de texto con botones(i) , i vendría siendo la posición que iría del 0 al 10 inténtalo, espero te sirva

Ok, muchas gracias, de verdad.
Lo probaré y te comento.

Hice lo que dijiste arriba y no funciona. Me explico mejor tengo un textbox, un boton, creo textboxs en el evento load. En el evento click del boton trato de cambiar el texto de uno de ellos y sale un error. Como lo puedo solucionar.

Gracias por la ayuda

Private Sub Form1_Load
Dim i As Integer
Do While i < 3
i += 1
CajasTexto(i) = New TextBox
CajasTexto(i).Location = New Point(15 + (i - 1) * 65, 100)
CajasTexto(i).Text = "" & "Hola"
CajasTexto(i).Width = 60
CajasTexto(i).Height = 20
CajasTexto(i).Parent = Me
Loop
End Sub

Private Sub Button1_Click
CajasTexto(2).Text = TextBox1.Text
End Sub

Saludos:

Si entiendo bien, lo que necesitas es que los controles creados en tiempo de ejecucion tengan acciones (Eventos).

Para ello debes añadirlas, asi:

Código:

Private Sub BtnMensaje(ByVal sender As Object, ByVal e As System.EventArgs)
      NvoBoton.Text = "Hola"   
End Sub

   Dim NvoBoton As New Button
            With NvoBoton
                .Text = "Back"
                .Size = New Size(96, 23)
                .Location = New Point(4, 321)
                .Font = New Font("Microsoft Sans Serif", 8, FontStyle.Bold)
                .UseVisualStyleBackColor = True
            End With
            AddHandler NvoBoton.Click, AddressOf BtnMensaje
            Me.Controls.Add(NvoBoton)

Primero Creas la funcion, creas el control y despues asignas la funcion al control.

Espero ayude.


JOSE LUIS

Hola a todos, ya encontré la solución, el problema era que CajasTexto no era una variable pública. Cambie esto y el programa funcionó. Gracias por la ayuda