Postada em 09/09/2005 16:36 hs
Tenho esta rotina que uso para desativar os controles do form:
Public Sub BloquearControles(F As Form)
'Rotina bloquear caixa de texto dos formularios
For i = 0 To F.Controls.Count - 1
If TypeOf F.Controls(i) Is TextBox Then
F.Controls(i).Enabled = False
End If
If TypeOf F.Controls(i) Is ComboBox Then
F.Controls(i).Enabled = False
End If
next i
End Sub
So que neste form tenho algum controles TextBox e ComboBox do Microsoft Forms 2.0 e esses controles a rotina acima não consegue desativar, como faço pra desativar esses controles tambem.
|
