SoloCodigo

CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: lencho en Sábado 4 de Noviembre de 2006, 04:34

Título: Controles En .net
Publicado por: lencho en Sábado 4 de Noviembre de 2006, 04:34
hola amigos, tengo un problema.

Deseo recorrer todos los controles de una forma y mostrar por ejemplo el nombre de los textbox y tengo un problema cuando me toco con un groupBox o alguno de otros contenedores como Panel, etc.
No me muestra los nombres de los textbox que estan dentro de un groupbox.

Código: Text
  1.  
  2.         Dim ctrl As Control
  3.         For Each ctrl In Me.Controls
  4.             If (TypeOf (ctrl) Is TextBox) Then
  5.                 Dim miTextBox As TextBox
  6.                 miTextBox = DirectCast(ctrl, TextBox)
  7.                 MsgBox(miTextBox.Name)
  8.             End If
  9.         Next
  10.  
  11.  

trato de colocar otro if en el for, pero no logro hacer lo que quiero.

Espero y me ayuden.

BYTE.
Título: Re: Controles En .net
Publicado por: Cajami en Sábado 4 de Noviembre de 2006, 04:40
Hola que tal, mira es que en el for each estás poniendo me.control y ps hace referencia a todos los controles  y en el caso de los controles dentro de groupbox ps no los detecta, en este caso tienes que colocar asi:

  Dim ctrl As TextBox
       For Each ctrl In GroupBox
           If ctrl Is TextBox Then
               Dim miTextBox As TextBox
               miTextBox = DirectCast(ctrl, TextBox)
               MsgBox(miTextBox.Name)
           End If
       Next

Espero q despues de In Groupbox no vaya naa porque no me acuerdo, pero mas o menos asi debes de colocar.  :hola:

Tumbes - Perú
Título: Re: Controles En .net
Publicado por: lencho en Sábado 4 de Noviembre de 2006, 04:52
pues si, yo quiero que haga referencia a todos los controles incluidos a los que estan dentro de un groupbox.

Ya habia intentau con lo que dijiste.
Citar
For Each ctrl In GroupBox
pero me sale error en in GroupBox.

GRACIAS.

BYTE.
Título: Re: Controles En .net
Publicado por: Cajami en Sábado 4 de Noviembre de 2006, 04:54
ps supongo que debes de poner despues de In GroupBox.Controls, lo haría en Visula pero recien lo voy a instalar mañan, pero se que si uno quiere hacer referencia a los controles dentro del groupbox ps se debe poner asi, haber prueba. :hola:

Tumbes - Perú
Título: Re: Controles En .net
Publicado por: lencho en Sábado 4 de Noviembre de 2006, 05:12
nada, no me sale !!!!!!!.

BYTE.
Título: Re: Controles En .net
Publicado por: lencho en Sábado 4 de Noviembre de 2006, 05:15
ahora si, me salio.

ahi ta el codigo.

Código: Text
  1.  
  2.         Dim ctrl, ctrl2 As Control
  3.         For Each ctrl In Me.Controls
  4.             If (TypeOf (ctrl) Is GroupBox) Then
  5.                 Dim miGroup As GroupBox
  6.                 miGroup = DirectCast(ctrl, GroupBox)
  7.                 For Each ctrl2 In miGroup.Controls
  8.                     If (TypeOf (ctrl2) Is TextBox) Then
  9.                         Dim miTextBox As TextBox
  10.                         miTextBox = DirectCast(ctrl2, TextBox)
  11.                         MsgBox(miTextBox.Name)
  12.                     End If
  13.                 Next
  14.             End If
  15.  
  16.             If (TypeOf (ctrl) Is TextBox) Then
  17.                 Dim miTextBox As TextBox
  18.                 miTextBox = DirectCast(ctrl, TextBox)
  19.                 MsgBox(miTextBox.Name)
  20.             End If
  21.         Next
  22.  
  23.  

pero esto es solo para los textbox que estan en el formulario y sobre un groupbox, tendre que hacerlo tambien para los que estan dentro de un panel !!!.

Gracias por la ayuda Cajami.

BYTE.
Título: Re: Controles En .net
Publicado por: Soultaker en Lunes 6 de Noviembre de 2006, 05:49
Código: Text
  1.         Dim obj As Object
  2.         For Each obj In Me.Controls
  3.             If TypeOf obj Is TextBox Then obj.text = "ya ta"
  4.         Next
  5.         For Each obj In Me.GroupBox1.Controls
  6.             If TypeOf obj Is TextBox Then obj.text = "ya ta"
  7.         Next
  8.  
Título: Re: Controles En .net
Publicado por: lencho en Lunes 6 de Noviembre de 2006, 14:36
tambien me funciono muy bien tu codigo Soultaker.
Gracias.

Ahora que si estuviera hablando de un textbox que esta dentro de un GroupBox que esta dentro de otro GroupBox, tendria que hacerlo de forma recursiva !!!.

BYTE.