Visual Basic - Contar digitos de un textBox

Quisiera saber si es posible y si lo es que alguien me pueda ayudar para como contar los digitos que se insertan en un TextBox y agregarle un digito arbitrariamente, es decir:

por ejemplo si tengo un Text1 que cuando el usuario digite 2 digitos el tercero lo inserto de inmediato yo automaticamente y luego el seguirá ingresando el tercer, cuarto, quinto, etc digito.

En el evento change del textbox

If Len(Text1.Text) = 3 Then
Text1 = Text1 + "7" 'o lo que quieras
Text1.SelStart = Len(Text1) 'lleva el cursor al final
End If

Pd. Cuando inicia el textbox, el cursor aparece una posicion adelantado (Len=1) o lo tienes en cuenta o en el form_load le pones:
Text1=""