Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Oi pessoal.
Tenho um caixa de texto multiline onde o conteudo é salvo em um banco de dados.
Ocorre que por vezes tenho que localizar todos os arquivos que contêm um determinado texto,
então gostaria de saber como posso solicitar ao usuário que digite o texto de procura na caixa de texto e
precione as teclas Ctrl + L par efetuar a pesquisa no banco de dados.
Tenho uma idéia porém não estou conseguindo achar os comandos corretos.
No evento Keypress da caixa de texto digitei
IF keypress = vb... + vb... then (consulta SQL)
obrigado
Valeu colega sua diga resolveu meus problemas, sendo assim agradeço e deixo mais algumas dicas sobre o assunto para quem necessitar.
Um abraço.
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = 76 And Shift = 2) Then
MsgBox "CTRL + L"
End If
If (KeyCode = 76 And Shift = 1) Then
MsgBox "SHIFT + L"
End If
If (KeyCode = 76 And Shift = 3) Then
MsgBox "CTRL + SHIFT + L"
End If
End Sub
Opa ... tente isso:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = 76 And Shift = 2) Then
MsgBox "Codigo para Localizar"
End If
End Sub