Porque da este error...?

03/09/2004 - 18:07 por David Fúnez | Informe spam
Ok;

Tengo este código en el evento LOAD de mi form para inhabilitar controles,
pero da error:

Mensaje de error:

[Excepción no controlada del tipo 'System.InvalidCastException' en
Northwind.exe]

[Información adicional: Specified cast is not valid.]


Dim ctl As TextBox

For Each ctl In Me.Controls

ctl.Enabled = False

Next

El error se posiciona en la línea del For Each, cómo lo soluciono?.

Gracias de antemano.

David Fúnez
Tegucigalpa, Honduras
davidff@correo.de

"La Piratería Mata Las Ideas "
 

Leer las respuestas

#1 Jose Marcenaro
03/09/2004 - 18:21 | Informe spam
Lo que ocurre es que no todos los controles son textbox, debes preguntar por
el tipo de control.
Usa lo siguiente:

Dim ctl As Control
Dim txt As TextBox

For Each ctl In Me.Controls
If TypeOf ctl Is TextBox Then
txt = CType(ctl,TextBox)
'... aqui puedes usar todas las propiedades del textbox
txt.Enabled = False
End If
Next

Saludos
Jose Marcenaro

"David Fúnez" escribió en el mensaje
news:uX4lB$
Ok;

Tengo este código en el evento LOAD de mi form para inhabilitar controles,
pero da error:

Mensaje de error:

[Excepción no controlada del tipo 'System.InvalidCastException' en
Northwind.exe]

[Información adicional: Specified cast is not valid.]


Dim ctl As TextBox

For Each ctl In Me.Controls

ctl.Enabled = False

Next

El error se posiciona en la línea del For Each, cómo lo soluciono?.

Gracias de antemano.

David Fúnez
Tegucigalpa, Honduras


"La Piratería Mata Las Ideas "


Preguntas similares