SOM COM KEYCODE

MKV 29/08/2007 14:52:59
#233287
Blz, Bom ja vi por aqui uma solução mais não achei agora que to procurando é sempre assim

eu tenho o seguinte codigo

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 13 Then
'executa minha função
End If

End Sub


só que toda faz um som maldito, ja tentei de duto, a sulução foi deligar
os avisos de som do windows. Mais sempre tem aquele cliente que adora
esses sons então não da pra sair desligando todos os sons do micro do
cliente. alguem sabe onde acho alguma coisa que desligue isso?

Obrigado
USUARIO.EXCLUIDOS 29/08/2007 15:03:52
#233290
Resposta escolhida
MKV,

No evento "KeyDown" nao consegui, so no "KeyPress".

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then
'FUNÇÃO
KeyAscii = 0
End If

End Sub


Valeu!

MKV 29/08/2007 22:03:52
#233345
Funcionou blz veio gradecido mesmo


Tópico encerrado , respostas não são mais permitidas