cantidad maxima de caracteres en una TexBox

[GeoAvila]

no te habia repondido porque pense ya lo habian hecho..

pero es algo asi..

Código:

Dim texto As String
texto = text1.Text
If Len(texto) <> 4 Then
MsgBox "Eltexto debe ser igual a 4"
End If
MsgBox Len(texto)

nos vemos espero te sirva el codigo..