HO ELABORATO IL SUGGERIMENTO DI BRAZERO:
HO CREATO QUATTRO TEXTBOX CON QUATTRO NOMI DIVERSI E LE HO ASSEGNATO UN VALORE IN TABINDEX DA 4 A 7
QUESTO E' QUELLO CHE E' VENUTO FUORI E CHE FUNZIONA

Private Sub pulisciText()
Dim ctrl As Control

For Each ctrl In Me.Controls

If TypeOf (ctrl) Is TextBox Then

If ctrl.TabIndex >= 4 And ctrl.TabIndex <= 7 Then

ctrl.Text = ""

End If

End If

Next

End Sub

NIENTE IN CONFRONTO AL VB6 DOVE CON UN SEMPLICE

For i=4 to 7

textbox(i).text=""

next

DOPO AVER CREATO UNA MATRICE DI CONTROLLI TEXTBOX.
PERCHE' HANNO TOLTO COSE UTILI E COMPLICARCI LA VITA?

PER BRAZERO: INTENDEVI QUESTO CODICE?

CIAO