Array de TextBox en VB.NET

[daPhyre]

Tengo una serie de TextBox que quiero controlar de forma masiva a través de un form. Para ello, hago una declaración como la siguiente:

Código:

Dim txts As TextBox() = New TextBox() {txt1, txt2, txt3, txt4} 'Y varios más

Para inicializarlos, hago lo siguiente:

Código:

        Dim i As Integer
        For i = 0 To txts.Length - 1
            txts(i).Clear()
        Next

Y aquí comienzan mis problemas, pues a la hora de correrlo, se frena un programa subrayandome el "txts(i).Clear()", diciendo que no se ha inicializado, y lo haga con un New (Como es lógico en tales casos).

Pero hasta donde yo se, si lo he inicializado. Ya le he movido a la declaración, poniendole y quitándole partes esperando que funcione, basandome en ejemplos similares que tengo, pero no encuentro la solución, y comienzo a desesperarme un poco. Espero puedan ayudarme. Gracias.

[daPhyre]

¿Nadie ha encontrado alguna solución a mi problema? =S

[karloz21]

inicializalos con txts(i).text=""

[JonathanB]

Saludos, el problema que tienes (me imagino) es por que no se esta asignando los text a tu arreglo, si los tienes declarado de esta manera


Podras ver que si inspeccionamos la variable txts, tiene cuatro elementos nulos, es decir no se han asignado los textbox que necesitas.


Ahora si lo agregas al procedimiento que estés utilizando para limpiar los textos, la variable txts tendrá asignados los textbox que has creado.


Inspeccionando el valor de txts:



El siguiente código te debe de funcionar

Código vb:

Private Sub LimpiarTextos()
    Dim txts As TextBox() = New TextBox() {txt1, txt2, txt3, txt4} 'Y varios más
    Dim i As Integer
    For i = 0 To txts.Length - 1
        txts(i).Text = ""
    Next
End Sub
 

Espero que te haya sido de utilidad