gente como faço para a tecla enter funcionar coomo TAB.

tenta assim:

 

Private Sub Form_KeyDown(KeyCode As Integer, Shift _
      As Integer)
  If KeyCode = vbKeyReturn then
    Sendkeys "{Tab}"
    KeyCode = 0
  End If
End Sub

 

ou sem usar sendkeys:

http://www.vbweb.com.br/dicas_visual.asp?Codigo=812&Classificacao=

 

obs.: Se for o form mude a propriedade keypreview = true

 

t+

Olá,

Se você estiver usando o windows 2000 não use o "SENDKEYS" ele costuma travar o teclado, a melhor maneira de fazer isso é assim:

'Em um modulo:

Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd as long, byval wMsg as Long, byval wParam as Long, Iparam as Any) as Long

Public Const WM_KEYDOWN = &H100
Public Const VK_TAB=&h9

' nos eventos

Private Sub Text1_KeyPress(KeyAscii As Integer)

Dim RetVal

If KeyAscii = 13 Then
   RetVal = PostMessage(Me.hwnd, WM_KEYDOWN, VK_TAB, 0)
   KeyAscii = 0
End If

end sub

 

ou você pode usar no evento do form.

 

Até +