Visual Basic - inhabilitar varios texbox

alguien sabe como inhabilitar varios texbox sin tener que escribir :

text1.enabeld = false

por que son como veinte text para no repetir esto tantas veces....

Private Sub cmdVaciartxt_Click()
VaciarTextBox Me
End Sub

Y en un modulo Bas

Sub VaciarTextBox(frmx As Form)
Dim ctrl As Integer
For ctrl = 0 To (frmx.Controls.Count - 1)
Set controlsel = frmx.Controls(ctrl)
If TypeOf controlsel Is TextBox Then
controlsel.Text = ""
End If
Next ctrl
End Sub

Adaptalo a tu programa

De todas maneras cuando se tienen que manejar muchos TextBox te aconsejo que uses una matriz de controles a no ser que no puedas utilizar una matriz por lo que sea.

Un saludo y espero que te sirva

--llamar la funcion
habilita_txt(true) ó habilita_txt(false)

--Crea una funcion asi por ej.
Private function habilita_txt(como as boolean)
txt1.enabled=como
txt2.enabled=como
txt3.enabled=como
txt4.enabled=como
txt5.enabled=como
.
.
end function