Como limitar cantidad de caracteres con teclado

[coyote20]

Hola tengo una curiocidad

con la funcion

Function menosdies(ByVal digitos As String) As Boolean
If digitos.Length < 10 Then
Return True
Else
Return False

End If
End Function

puedo limitar la cantidad de veces que se preciona un boton en este caso si pulso 10 veces un boton con algun numero no pasa a mas de 10 numeros

Como puedo hacer lo mismo pero con el teclado, limitar la cantidad de caracteres que se escribe por teclado

saludos a todos y gracias