Olá, como descrito no título, eu gostaria de saber como faz para uma TextBox executar um código após pressionar Enter, pois a cada tecla apertada ele executa o código.
Como exemplo eu estou usando um WebBowser com o seguinte código:
Sub pesquisagoogle()
WebBrowser1.Navigate "https://www.google.com.br/?gfe_rd=cr&ei ... _rd=ssl#q=" + (TextBox1.Text)
End Sub
estou usando esse código:
Private Sub TextBox1_KeyPress(KeyAscii As Integer)
If (KeyAscii = 13) Then 'Keyascii 13 = Enter key
GoTo pesquisagoogle
End If
End Sub
Porém está dando o seguinte erro:
Erro de compilação:
A declaração do procedimento não corresponde à descrição do evento ou procedimento que possui o mesmo nome.
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Executar TextBox ao pressionar Enter [RESOLVIDO]
Executar TextBox ao pressionar Enter [RESOLVIDO]
Editado pela última vez por samuka004 em Sex Abr 10, 2015 9:49 am, em um total de 1 vez.
- Rafael Monteiro
- Consultor
- Mensagens: 277
- Registrado em: Seg Nov 28, 2011 8:27 am
- Localização: Sorocaba - SP
- Contato:
Re: Executar TextBox ao pressionar Enter
Insira esse código.
Código: Selecionar todos
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then pesquisagoogle
End Sub