Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

limpiar cajas de texto

13/10/2005 - 00:08 por Hugo Gsell | Informe spam
Ayuda Hacer una pregunta
No te estoy entendiendo... xform es el nombre del formulario dentro del cual
se encuentra los text que quiero limpiar ...
AHORA EL ERROR ME DA EN LA
llamada al procedimiento LimpiaCajas
o sea, desde un form llamo al procedimiento así:
LimpiaCajas(Me)

el error es:
D:\Sistemas .NET\SistemaMedico\SistemaMedico\Pacientes.vb(570): Un valor de
tipo 'SistemaMedico.Pacientes' no se puede convertir en '2'.


"Imac_man" <usuarioespecifico@hotmail.com> escribió en el mensaje
news:ulIELW3zFHA.2540@TK2MSFTNGP09.phx.gbl...

a XFORM debes declrarlo como la coleccion de objetos que pertenecen al
formulario.

saludos

"Hugo Gsell" <hagsell@hotmail.com> escribió en el mensaje
news:u59WVR3zFHA.3540@TK2MSFTNGP10.phx.gbl...
> En .NET Leonardo me respondio (ver abajo)
> estoy utilizo para limpiar los text de un form
> Private Sub LimpiaCajas(ByVal xForm As Form)
> Dim Ctrl As Control
> For Each Ctrl In xForm
> If TypeOf Ctrl Is TextBox Then
> Ctrl.Text = ""
> End If
> Next
> End Sub
>
> ME DA EL ERROR
> EN LA LINEA For Each Ctrl In xForm ESPECIFICAMENTE EN LA PALABRA XFORM
>
> D:\Sistemas .NET\SistemaMedico\SistemaMedico\Pacientes.vb(589): La
> expresión
> es del tipo 'System.Windows.Forms.Form', que no es un tipo de colección.
>
> como puedo solucionarlo?
>
>
> Hugo A. Gsell
> Sgo del Estero
> Argentina
>
>
>
>
> "Leonardo Azpurua [mvp vb]" <l e o n a r d o (arroba) m v p s (punto) o


r

> g>
> escribió en el mensaje news:uVHvabHyFHA.3892@TK2MSFTNGP12.phx.gbl...
>>
>> "Hugo Gsell" <hagsell@hotmail.com> escribió en el mensaje
>> news:Ok6Xa7GyFHA.1856@TK2MSFTNGP12.phx.gbl...
>> > Hola.. en el viejo vb6 tenia una clase que hacía lo siguiente
>> > limpiaba los text de un formulario como ahgo para pasar estoa


.net?

>> >
>> > Public Sub LimpiaCajasText(xForm As Form)
>> > Dim Ctrl As Control
>> > For Each Ctrl In xForm
>> > If TypeOf Ctrl Is TextBox Then
>> > Ctrl.Text = "" Then
>> > End If
>> > Next
>> > End Sub
>>
>> Hola, Hugo:
>>
>> Es exactamente igual, salvo que
>> TypeOf Ctrl Is TextBox
>> puede ser reemplazado por
>> Ctrl.GetType.Name = "TextBox"
>>
>> Ademas de que debe haber al menos tres maneras mas de hacer lo mismo.
>>
>>
>> Salud!
>>
>>
>
>


email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 peky
13/10/2005 - 03:33 | Informe spam
El siguiente código lo probé y funciona. es un poco más limpio que el que
creaste.

Sub LimpiaCajas(ByVal Form As Form)
For Each c As Control In Form.Controls
If TypeOf c Is TextBox Then DirectCast(c, TextBox).Text = ""
Next
End Sub

probalo. si te sigue dando el error: "Un valor de tipo
'SistemaMedico.Pacientes' no se puede convertir en '2'." entonces el problema
es en la llamada. asegurate que el parámetro que estás pasando es del tipo
Form

peky

"Hugo Gsell" wrote:

No te estoy entendiendo... xform es el nombre del formulario dentro del cual
se encuentra los text que quiero limpiar ...
AHORA EL ERROR ME DA EN LA
llamada al procedimiento LimpiaCajas
o sea, desde un form llamo al procedimiento así:
LimpiaCajas(Me)

el error es:
D:\Sistemas .NET\SistemaMedico\SistemaMedico\Pacientes.vb(570): Un valor de
tipo 'SistemaMedico.Pacientes' no se puede convertir en '2'.


"Imac_man" escribió en el mensaje
news:
> a XFORM debes declrarlo como la coleccion de objetos que pertenecen al
> formulario.
>
> saludos
>
> "Hugo Gsell" escribió en el mensaje
> news:
> > En .NET Leonardo me respondio (ver abajo)
> > estoy utilizo para limpiar los text de un form
> > Private Sub LimpiaCajas(ByVal xForm As Form)
> > Dim Ctrl As Control
> > For Each Ctrl In xForm
> > If TypeOf Ctrl Is TextBox Then
> > Ctrl.Text = ""
> > End If
> > Next
> > End Sub
> >
> > ME DA EL ERROR
> > EN LA LINEA For Each Ctrl In xForm ESPECIFICAMENTE EN LA PALABRA XFORM
> >
> > D:\Sistemas .NET\SistemaMedico\SistemaMedico\Pacientes.vb(589): La
> > expresión
> > es del tipo 'System.Windows.Forms.Form', que no es un tipo de colección.
> >
> > como puedo solucionarlo?
> >
> >
> > Hugo A. Gsell
> > Sgo del Estero
> > Argentina
> >
> >
> >
> >
> > "Leonardo Azpurua [mvp vb]" <l e o n a r d o (arroba) m v p s (punto) o
r
> > g>
> > escribió en el mensaje news:
> >>
> >> "Hugo Gsell" escribió en el mensaje
> >> news:
> >> > Hola.. en el viejo vb6 tenia una clase que hacía lo siguiente
> >> > limpiaba los text de un formulario como ahgo para pasar estoa
..net?
> >> >
> >> > Public Sub LimpiaCajasText(xForm As Form)
> >> > Dim Ctrl As Control
> >> > For Each Ctrl In xForm
> >> > If TypeOf Ctrl Is TextBox Then
> >> > Ctrl.Text = "" Then
> >> > End If
> >> > Next
> >> > End Sub
> >>
> >> Hola, Hugo:
> >>
> >> Es exactamente igual, salvo que
> >> TypeOf Ctrl Is TextBox
> >> puede ser reemplazado por
> >> Ctrl.GetType.Name = "TextBox"
> >>
> >> Ademas de que debe haber al menos tres maneras mas de hacer lo mismo.
> >>
> >>
> >> Salud!
> >>
> >>
> >
> >
>
>





Preguntas similares

 

Busqueda sugerida :