AJUDA COM BUTTON

FERATK 18/07/2010 20:28:39
#347692
Pessoal Estou com uma séria duvida, eu presciso que o meu teclado (apenas o numérico, Aquele bem da direita)
represente os botões da minha calculadora.
Eu quero que o
Button [Ô]0[Ô] seja representado pela tecla [Ô]0[Ô]
E assim por diante
o Button [Ô]C[Ô] pela tecla [Ô] * [Ô] (asterisco)
o Button [Ô]imprimir[Ô] pela tecla [Ô] / [Ô] (barra).
o Button [Ô]=[Ô] pela tecla [Ô]Enter[Ô]
o Button [Ô]+[Ô] pela tecla [Ô]+[Ô] (mais)
o Button [Ô]-[Ô] pela tecla [Ô]-[Ô] (menos)
o button [Ô],[Ô] pela tecla [Ô],[Ô] (virgula)
o Button [Ô]sair[Ô] pela tecla [Ô]Esc[Ô]
Obrigado a todos por tudo
TECLA 18/07/2010 21:18:36
#347694
Uma dica para você descobrir o ASCII referente a cada tecla, proceda da seguinte forma:

1. Habilite a propriedade KEYPREVIEW do FORM para TRUE;
2. Escreva a linha de código abaixo no evento KEYPRESS do FORM;
Private Sub Form_KeyPress(KeyAscii As Integer)
MsgBox KeyAscii
End Sub

3. Pressione a tecla desejada e conheça o ASCII referente;
4. Utilize uma instrução de condição (IF...THEN ou SELECT CASE) para comparar ao ASCII obtido. Exemplo:
Select Case KeyAscii
    Case vbKey1
        Call btnUm_Click
    Case vbKey2
        Call btnDois_Click
    Case vbKeyPrint
        Call btnC_Click
End Select


é por aí!
TECLA 18/07/2010 21:22:53
#347696
Uma outra alternativa, seria você abrir o OBJECT BROWSER (F2), e digitar a palavra-chave KEYCODE na caixa de pesquisa.
Veja a imagem abaixo:
FERATK 18/07/2010 21:25:18
#347698
Cara sem querer ser ignorante mas já sendo
eu não entendi muito bem

eu uso aonde este codigo:
Private Sub Form_KeyPress(KeyAscii As Integer)
MsgBox KeyAscii
End Sub


E este:
Select Case KeyAscii
Case vbKey1
Call btnUm_Click
Case vbKey2
Call btnDois_Click
Case vbKeyPrint
Call btnC_Click
End Select
EDERMIR 19/07/2010 00:54:31
#347704 Resposta escolhida
Citação:

:
Private Sub Form_KeyPress(KeyAscii As Integer)
MsgBox KeyAscii
End Sub


Você usa este código para descobrir o código ASCII da tecla pressionada. é apenas auxiliar.
Citação:


Select Case KeyAscii
Case vbKey1
Call btnUm_Click
Case vbKey2
Call btnDois_Click
Case vbKeyPrint
Call btnC_Click
End Select


Você usa este código para realizar a [Ô]ilusão[Ô] que você deseja.


Lembre-se que o teclado numérico pode estar DESABILITADO. Se quiser utilizar as teclas da mesma forma, deverá saber o código das SETAS.

Lembre-se que o código ASCII é igual para todas as teclas do teclado, ou seja o número 1 do teclado alfanumérico tem o mesmo código ASCII do número 1 do teclado numérico.
Tópico encerrado , respostas não são mais permitidas
Voltar