Visual Basic - selccionar ultima letra

Hola, tengo una variable DNI que consta de numeros y la letra, ej 458985266p. Yo quiero coger por un lado los numeros para mostrarlo en un text y la letra por otro lado para mostrarlo en otro text...
¿Me podrian ayudar?

Muchas gracias por su tiempo

Con este codigo recorres el string de la Variable DNI y cuando encuentra una letra te la muestra en un msgbox, vos la pode poner donde te guste...
espero te sirva y suerte....

GRINGO.....

For i = 1 To Len(Text1.Text) 'Text1.Text es la variable DNI
If Not IsNumeric(Mid(Text1.Text, i, 1)) Then
MsgBox Mid(Text1.Text, i, 1)
End If
Next

Te lo pongo de otra manera

Text1 = Left(DNI, Len(DNI) - 1) <- los números
Text2 = Right(DNI, 1) <- La letra

Muchas gracias por vuestras buenas respuestas

Un saludo