[Passar para outra text.Box teclando ENTER]

A finalidade é usar o enter no lugar do Tab para navegar entre os campos.

[VB não aceita SendKeys]

Ola, alguém sabe me dizer porque o código abaixo não esta funcionando:

 

Private Sub Form_KeyPress(KeyAscii As Integer)
    
   If KeyAscii = 13 Then
      SendKeys "{Tab}"
      KeyAscii = 0
       
  End If
    
End Sub

o erro que esta dando é:

run time error 70

permission denied

 

Valeu.

[Passar para outra text.Box teclando ENTER]

Boa noite, alguém pode me ajudar? O que esta errado nesse código:

Private Sub Form_KeyPress(KeyAscii As Integer)
    
    If KeyAscii = 13 Then
       SendKeys "{Tab}"
       KeyAscii = 0
       
    End If
    
End Sub
 

Da erro de run-time error '70'

permission denied 

Valeu.

[Select No Vb6.0]

Olá, alguém poderia me ajudar, não sei oque esta errado nesse comando,

Dim con As New ADODB.Connection
Dim rst As New ADODB.Recordset
rst.Open "Select * From Maquinas WHERE Nome=' " & txtNome.Text&" ' , con, adOpenKeyset, adLockOptimistic, adCmdText"