Existem text que fazem isto automaticamente (Ex: ActveTextBox)
Mas você pode usar o chage e o len para fazer isto o que seria uma forma simples entretanto se for usar em todos os texts ficará complicado.
Private Sub Form_Load()
Text1.MaxLength = 8
End Sub
Private Sub Text1_Change()
If Len(Text1.Text) = 8 Then
Text2.SetFocus
End If
End Sub