USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (Mouse/Teclado)

Título da Dica:  Identificando as Teclas F2 ..... F12 e Print Screen
Postada em 7/7/2003 por Ronaldão         
*coloque o código no evento KeyUp do form e com a propriedade Keypreview = True.

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
    Case Is = 44
        MsgBox "Tecla Print Screen pressionada!"
    Case Is = 112
        MsgBox "Tecla f1 pressionada!"
    Case Is = 113
        MsgBox "Tecla f2 pressionada!"
    Case Is = 114
        MsgBox "Tecla f3 pressionada!"
    Case Is = 115
        MsgBox "Tecla f4 pressionada!"
    Case Is = 116
        MsgBox "Tecla f5 pressionada!"
    Case Is = 117
        MsgBox "Tecla f6 pressionada!"
    Case Is = 118
        MsgBox "Tecla f7 pressionada!"
    Case Is = 119
        MsgBox "Tecla f8 pressionada!"
    Case Is = 120
        MsgBox "Tecla f9 pressionada!"
    Case Is = 121
        MsgBox "Tecla f10 pressionada!"
    Case Is = 122
        MsgBox "Tecla f11 pressionada!"
    Case Is = 123
        MsgBox "Tecla f12 pressionada!"
End Select
End Sub
 


CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página