Visual Basic - KeyDown

Perdon a todos, pero antes me he explicado mal.
Private Sub TNOMBRE_KeyDown(vbKeyReturn As Integer, Shift As Integer)
Kiero hacer que al presionar la tecla intro se pase de textbox, pero al escribir esto, sucede que se pasa de textbox al presionar cualquier tecla.¿Que tengo que hacer?
Gracias

Es un truco que encontré en otro foro:

If KeyAscii = 13 Then
SendKeys "{TAB}", True
KeyAscii = 0 ' para evitar un 'beep' indeseado
End If

Espero que te sirva...