Visual Basic - SET FOCUS A UN TEXTBOX

Hola, mi problema es que tengo 3 textbox, y necesito hacer que cuando termine de escribir en uno, al precionar la tecla enter, pase al segudo y asi sucesivamente, pero no se como podria hacerlo, si me podrias ayudar te lo agradezco mucho.

Gracias

Private Sub txtUsuario_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 13
If Len(Trim$(txtUsuario.Text)) > 0 Then
txtPassword.SetFocus
End If
Case Else
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Select
End Sub

Saludos Manuel
Lima - Perú

Private Sub txtUsuario_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 13
If Len(Trim$(txtUsuario.Text)) > 0 Then
txtPassword.SetFocus
End If
Case Else
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Select
End Sub

Nota : No Pongas como default ENTER los botones de comando

Saludos Manuel
Lima - Perú

gracias, y que puedo hacer si quiero escribir 4 caracteres que sean unicamente numero y al precionar enter pase al siguiente texto???

Hay una forma muy sencilla de hacerlo que es la siguiente;

1. en las propiedades del Form la la propiedad KeyPreview la pones en True

2. En el evento KeyPress del Form pones este código:

' Saltar al siguiente campo con enter
If KeyAscii = 13 Then
SendKeys "{Tab}", True
KeyAscii = 0
End If

3.Recuerda tambien revisar que los TextBox se pasen en el orden que tu quieres esto es en la propiedad de cada TextBox TabIndex

seria algo asi el TabIndex de los TextBox :
Text1 TabIndex 0
Text2 TabIndex 1
Text2 TabIndex 2

entonces cuando presionas enter en el Primero se pasa al segundo y asi...

Espero que te sirva.

y si no etamos para ayudarte hasta donde podamos

salu2