problemas con controles

22/07/2004 - 01:56 por José Mª Toro Bermejo | Informe spam
Tengo una aplicacion en la que quiero poner a enable =false todos los
botones. El codigo que utilizo es :

Dim ctr As Control
Dim btn As Button
For Each ctr In Controls
If TypeOf ctr Is Button Then
btn = CType(ctr, Button)
MessageBox.Show(btn.Text)
End If
Next

el problema es que los botones no se ponen enable=false, ¿alquien sabe que
hago mal?¿Hay otra solucion para hacer lo que quiero conseguir en mi
aplicacion?

GRACIAS DE ANTEMANO
 

Leer las respuestas

#1 Carlos Solivan
22/07/2004 - 04:38 | Informe spam
Usa tus conosimientos de otras cosas al 100 %
Casi siempre uno le pone el nombre del boton
BtnInsertar,BtnBorrar,BtnCancelar
Y los textbox pues txtNum,TxtMiao,txtMichuMichu

Private Sub Enable()
Dim BtnCtr As Control
Dim btn As New Control
Dim Btn2 As String = "btn"
Dim Btn3 As String = ""
For Each BtnCtr In Me.Controls
Btn3 = Microsoft.VisualBasic.Left
(BtnCtr.Name, 3)
If Btn2 = Btn3 Then
BtnCtr.Enabled = False
End If


Next
End Sub
















Miao...



Tengo una aplicacion en la que quiero poner a enable


=false todos los
botones. El codigo que utilizo es :

Dim ctr As Control
Dim btn As Button
For Each ctr In Controls
If TypeOf ctr Is Button Then
btn = CType(ctr, Button)
MessageBox.Show(btn.Text)
End If
Next

el problema es que los botones no se ponen enable=false,


¿alquien sabe que
hago mal?¿Hay otra solucion para hacer lo que quiero


conseguir en mi
aplicacion?

GRACIAS DE ANTEMANO


.

Preguntas similares