Visual Basic para Aplicaciones - Ingeniero

Hola, tengo 2 consultas:

CONSULTA 1
Tengo este codigo para que me avise si en un Textbox introducen mas de 4 letras

largo_entrada = Len(Me.TextBox2)
Select Case largo_entrada
Case 5
MsgBox "No puede ingresar mas de 5 numeros"
End Select

Pregunta: ¿Como hago para que ademas de avisarme que he ingresado mas de 5 numeros, borre el ultimo ingresado?

CONSULTA 2
Que codigo uso para indicar que vaya de un textbox a otro apretando la tecla "enter"?

Hola, para la primera puedes poner lo siguiente despues del msgbox
TextBox2.text= left (TextBox2.text, 4)

y para la otra si en realidad estas usando VBA eso lo hace automaticamente si no prueba con

Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 65 Then SendKeys vbTab
End Sub

varia un poco para VB pero seguro hallaras el equivalente, cualquier duda con gusto te ayudo.