|
|
Postada em 04/01/2005 13:32 hs
gostaria de saber se no vb nãoi foi desenvolvido um comando de varredura de teclas semelhante ao inkey$ do basic ? obrigado! |
|
|
|
|
|
|
|
Postada em 04/01/2005 13:40 hs
Que eu saiba não tem nenhum, até porque, no VB isto não é necessário por ser uma linguagem voltada à eventos. Mas seja mais específico você precisa de uma função para... |
|
|
|
|
|
Postada em 04/01/2005 14:26 hs
Eu tenho a necessidade de controlar ações com teclas dentro de um loop. Então isso significa que eu saio do loop ao pressionar ESC. Enquanto isso um contador de tempo deve ficar ativo até esc ser pressionado. Entedo que posso obter isso através do TIMER porém isso ainda é pouco. |
|
|
|
kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 04/01/2005 14:44 hs
faça assim: public sair as boolean Private Sub cmdBotao_Click() sair = false do ...algum código... doevents if sair = true then exit do end if loop ... Entao, no evento KeyDown do objeto owner(onde o loop está, Botão, form...) Private Sub cmdBotao_KeyDown(KeyCode as Integer, Shift as boolean) sair = true End Sub |
|
|
|
|
|
Postada em 04/01/2005 23:05 hs
Outra alternativa.
Na seção de declarações do form.
Private Declare Function GetInputState Lib "user32" () As Long
Onde você quiser testar se foi pressionado uma tecla ou o mouse:
If GetInputState() <> 0& Then
' Um evento do mouse ou keyboard está na fila de mensagens.
...
End if
|
|
|
|
