Visual Basic.NET - el textbox me roba el ultimo caracter

Hola a todos
el problema que no me deja dormir hoy es el siguiente.
quiero ingresar un dato de 9 caracteres por textbox, sencillo cierto ???
pero cuando lo voy a validar veo que tengo 8 en lugar de 9
ahi va el codigo :

Private Sub T3_KeyPress(sender As Object, e As KeyPressEventArgs) Handles T3.KeyPress
If Char.IsNumber(e.KeyChar) Then
e.Handled = False
Else
e.Handled = True
End If

If T3.Text.Length = 9 Then
T3.ForeColor = Color.Red
Tnom.Text = T3.Text ' puesto solo para verificar el texto
Tfam.Text = T3.Text.Length ' puesto solo para verificar el largo del texto
SendKeys.Send("{TAB}")
End If
End Sub

desde ya mil gracias

Hola,
No lo he testado, pero pienso que empresa no es el mejor evento.
No sé este quieres hacer, quizá sería mejor de utilizar keyup.
....

Gracias, ese es el problema , ya estoy investigando en esa direccion :)