buenas amigos, tengo un problema con un programa que tengo, tenia win xp y funcioaba bien en la opciones donde daba enter para pasar al siquiente dato, ahora lo tengo en win 7 y le doy enter y me saca error la orden es.

Private Sub txtNombre_KeyPress(KeyAscii As Integer)
    'QUE PASE A LA SIGUIENTE CAJA DE TEXTO POR MEDIO DE ENTER
        If KeyAscii = 13 Then
            SendKeys "{tab}"    'SE PULSA LA TECLA TAB AUTOMATICAMENTE[/font]
    'CONVIERTE TODO LO QUE EL USUARIO ESCRIBA EN MAYUSCULA
    KeyAscii = Asc(UCase(Chr(KeyAscii)))
 
                End If
 
End Sub
 

solo la parte de pasar por enter me molesta si me pueden ayudar les agradezco

cambia eso del tab por la propiedad focus del siguente elemento