how to get Shift key status

  • Thread starter Thread starter Boni
  • Start date Start date
B

Boni

Dear all,
How do I get information if Shift is pressed in a mouse wheel handler.
Thanks,
Boni
Sub MouseWheel(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) 'mouse whill handler

If SHIFT is pressed and e.delta.....

End Sub
 
Hello Boni,

You may be looking for this:

If Control.ModifierKeys = Keys.Shift Then...


Regards.


"Boni" <oilia@nospam> escribió en el mensaje | Dear all,
| How do I get information if Shift is pressed in a mouse wheel handler.
| Thanks,
| Boni
| Sub MouseWheel(ByVal sender As Object, ByVal e As
| System.Windows.Forms.MouseEventArgs) 'mouse whill handler
|
| If SHIFT is pressed and e.delta.....
|
| End Sub
|
|
 
José Manuel Agüero said:
You may be looking for this:

If Control.ModifierKeys = Keys.Shift Then...
Click to expand...

.... or, if you want to get the state of the key even if other modifier keys
are pressed:

\\\
If CBool(Control.ModifierKeys And Keys.Shift) Then
...
End If
///
 
Thank you Jose', Herfried.
BTW, what is the difference between keys.shift and keys.shiftkey
 
Keys.Shift is a "modifier key" and Keys.ShiftKey is a "key".
You use Keys.ShiftKey when you want to check only if the shift key is pressed.
You use Keys.Shift when you are checking for another key combined with the shift and, maybe, other modifier keys.

Also, you should always use bitwise operations, as Herfried noted, combined conveniently, depending if you can or cannot ignore other modifier keys.

Regards.


"Boni" <oilia@nospam> escribió en el mensaje | Thank you Jose', Herfried.
| BTW, what is the difference between keys.shift and keys.shiftkey
| | > "José Manuel Agüero" <chema012 en hotmail.com> schrieb:
| >>You may be looking for this:
| >>
| >>If Control.ModifierKeys = Keys.Shift Then...
| >
| > ... or, if you want to get the state of the key even if other modifier
| > keys are pressed:
| >
| > \\\
| > If CBool(Control.ModifierKeys And Keys.Shift) Then
| > ...
| > End If
| > ///
| >
| > --
| > M S Herfried K. Wagner
| > M V P <URL:http://dotnet.mvps.org/>
| > V B <URL:http://classicvb.org/petition/>
|
|
 
KahurangiKea said:
Sorry, above posting is incorrect. Only returns true if Shift is only
modifier key pressed, and

dim shiftPressed as Boolean = cBool(Control.ModifierKeys = Keys.Shift)

is simpler.
Click to expand...

Write '... = (Control.ModifierKeys = Keys.Shift)' to determine if the shift
modifier key is pressed only, and write '... = CBool(Control.ModifierKeys
And Key.Shift)' to determine if the shift modifier key and possibly other
modifier keys are pressed.
 
Back
Top