Visual Basic - Help necesito sacar los 2 ultimos digitos de Text

Hola necesito ayuda
necesito sacar los dos ultimos digitos de el text1.text
ejemplo
12332455500

quedaria haci 123324555

bueno y otra consulta tambien aprovechando
como puedo cambiar todos los numeros 5 de el texto

ejemplo 123324555
a 123324000

Right(Text1.Text, 2)
ENTONCES HACES LO SIGTE
Text1.Text = Replace(Text1.Text, Right(Text1.Text, 2), "")
ESO TE SERVIRA POR OTRA PARTE SI QUIERES REEPLAZAR LOS NUMEROS 5 ESTO TE SERVIRA
Text1.Text = Replace(Text1.Text, "5", "")
SUERTE