EVENTO KEYDOWN

USUARIO.EXCLUIDOS 09/11/2004 12:34:44
#49589 Resposta escolhida

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case Keycode
case enter
suarotina1
case vbkeydelete
suarotina2
case vbkeyinsert
suarotina3
End select
end sub

USUARIO.EXCLUIDOS 09/11/2004 13:03:22
#49592

se não me engano é um beep
e se não me engado também parece que a forma de retirar o beep é
If KeyCode = vbKeyReturn Then
SendKeys "{Tab}"
keyascii = 0 ou então keydown = 0 (tente, se não der certo avise - nos)

em tempo,
recebi seu email vou analiza - lo hoje a noite e amanha te passo o form utilizando textbox e outro utilizando datagrid

USUARIO.EXCLUIDOS 09/11/2004 15:08:26
#49607

pesquisei outro tópicos igual ao seu e verifiquei que muitos tiveram o mesmo problema e não conseguiram resolver, tente isto
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
KeyDown = 0
SendKeys "{Tab}"
End Sub

ou

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
KeyAscii = 0
SendKeys "{Tab}"
End Sub

se nenhuma das duas funcionar provavelmente não tenha como contornar então você deverá tentar usar o evente keypress

Private Sub Form_KeyPress(KeyAscii As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
KeyAscii = 0
SendKeys "{Tab}"
End Sub
ou
Private Sub Form_KeyPress(KeyAscii As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
SendKeys "{Tab}"
KeyAscii = 0
End Sub

escreva linha por linha, igual postado aqui

USUARIO.EXCLUIDOS 09/11/2004 16:02:36
#49619

o rodrigo tem razão não é keydown = 0 e sim keycode = 0 que é a variavel indicada no keydown[S55] desculpa aí

USUARIO.EXCLUIDOS 10/11/2004 08:18:13
#49681

quando você logar no site clique no seu nome de login do lado esquerdo, vai aparecer uma lista de todos os seus tópicos clique neste tópico quando abrir perceba que no canto superiro direito tem uma caixa "encerrar este tópico'" é so clicar.