Inquiridor
Evento ao apertar tecla

Pergunta
-
Olá pessoal,
Estou precisando de ajuda no seguinte problema no access...
Criei um formulário com um campo para inserir os códigos dos produtos e escrevi um código que deveria rodar após apertar a tecla enter no evento "ao apertar tecla" mas quando teclo enter o cursor troca de campo e não executa a função. como poderia resolver este problema?Private Sub TxtCodigoBarras_KeyDown(KeyCode As Integer, Shift As Integer) If ((KeyCode = 13) Or (KeyCode = 9)) Then If TxtCodigoBarras.Text <> "" Then 'ação End If End If End Sub
- Editado cristiano rosenhein domingo, 22 de setembro de 2019 21:02
Todas as Respostas
-
Os tipos dos parâmetros estão incorretos:
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If ((KeyCode = 13) Or (KeyCode = 9)) Then If TxtCodigoBarras.Text <> "" Then 'ação End If End If End Sub
Natan
-
Obrigado pela dica Natan, mas no access não funcionou, aparece o seguinte erro.
"a expressão ao apertar tecla que você inseriu como definição da propriedade de evento gerou o seguinte erro: o tipo definido pelo usuário não foi definido."
-
-