DevMedia - asp.net, Java, Delphi, SQL e web Design, tudo em um só lugar!
Bem vindo a DevMedia!
LOGIN:     SENHA:
 
 

Dicas .NET - Identificando o estado de teclas especiais CTRL, SHIFT e ALT

Veja nesta dica como identificar o estado das teclas CTRL, SHIFT e ALT.

Identificando o estado de teclas especiais CTRL, SHIFT e ALT

O VB.NET permite, através de algumas propriedades shared que alguns tipos de dados possuem, identificar o estado das teclas CTRL, SHIFT e ALT em qualquer momento no código.

O tipo Control possui a propriedade Shared chamada ModifierKeys (teclas modificadoras, traduzindo ao pé da letra).

ModifierKeys nos fornece uma mapa de bits das teclas pressionadas. Assim sendo, utilizando operações de bits com as propriedades do tipo Keys podemos identificar as teclas pressionadadas.

Exemplo:

 

Dim isShiftPressed As Boolean = (Control.ModifierKeys And Keys.Shift) <> 0

Dim isAltPressed As Boolean = (Control.ModifierKeys And Keys.Alt) <> 0

Dim isControlPressed As Boolean = (Control.ModifierKeys And Keys.Control) <> 0

 

MessageBox.Show("Shift pressionado: " & isShiftPressed & Environment.NewLine & _

"Alt pressionado:" & isAltPressed & Environment.NewLine & "Control pressionado:" & _

isControlPressed)

 





    2 COMENTÁRIOS

[Fechar]

Este post é fechado - você precisa ter acesso ao post para incluir um comentário.



William Fontinele França
E como seria para ientificar o estado do Caps Lock. pressionado ou não ?


em 27/7/2006 08:59 - Responder

 

  Devmedia
Olá William, acrescente apenas mais um teste de tecla as linhas de código: Dim isControlPressed As Boolean = (Control.ModifierKeys And Keys.CapasLock) > 0 caso não funcione tente o seguinte código no evento KeyUp ou KeyDown do Form: Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArg s) Handles Me.KeyDown If e.KeyCode = Keys.CapsLock Then e.Handled = True MsgBox("Caps Pressionado") End If End Sub Juliano Caldas caldassm@hotmail.com


em 27/7/2006 11:02 - Responder
 



Publicidade
Autor
Tipster .net

Dicas sobre .NET




Space do autor
Estatísticas
Favorito:
Comentários:
Feedback:
Utilidade:
0   0
[Fechar]

Você precisa estar logado para dar um feedback.

Clique aqui para efetuar o login
[Fechar]


Este post está fechado. Saiba mais sobre a assinatura MVP!
web-03
DevMedia  |  Anuncie  |  Fale conosco
Hospedagem web por Porta 80 Web Hosting
2012 - Todos os Direitos Reservados a web-03