HELP COM SENDKEYS

USUARIO.EXCLUIDOS 12/07/2004 09:51:21
#33152
Caros, esta questão deve ser muito simples... mas nao sei o que é...
fiz a instrução no evento keydown do form pro enter funcionar como tab

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

funciona normal, só que emite um som beep, tipo quando ocorre um erro.

c tiverem uma ideia agradeço
USUARIO.EXCLUIDOS 12/07/2004 13:11:52
#33195
Resposta escolhida
ou senão faça somente isso:

If KeyCode = 13 Then
keycode = 0 ' Desativa o Beep
SendKeys "{tab}" ' Ativa tecla tab
End If
Tópico encerrado , respostas não são mais permitidas