Ciao zanlu88s,
se ho interpretato bene la tua richiesta così dovresti risolvere:

codice:
Option Explicit
Private Sub Form_Load()
    Text1(0).Enabled = True
    Text1(1).Enabled = True
    Text1(2).Enabled = False
    Text1(3).Enabled = False
    Text1(4).Enabled = False
End Sub
'---------------------------------------
Private Sub Text1_Change(Index As Integer)
    If Len(Text1(1).Text) > 0 Then Text1(2).Enabled = True
    If Len(Text1(2).Text) > 0 Then Text1(3).Enabled = True
    If Len(Text1(3).Text) > 0 Then Text1(4).Enabled = True
End Sub
Per quanto riguarda il controllo del numero di caratteri digitabili fai riferimento alla prop. MaxLength
Text1(2).MaxLength = 5
che indica l'eventuale presenza di un numero massimo di
caratteri digitabili per il controllo TextBox ed il numero
di caratteri digitabili.
Come vedi nell'esempio ho utilizzato una matrice di Txt che agevola il lavoro che devi svolgere.
Ciao.