Shift/Ctrl in the OnMouseUp Sub

[Fred]

I have created a UserControl and now I need to Override the OnMouseUp,
OnMouseDown, and OnMouseClick Subs but I also need to know if the Shift or
Ctrl key was pressed when the mouse action happened. How can I do that

Thanks
Fred

[Carlos J. Quintero [VB MVP]]

Hi Fred,

You can use the ModifierKeys property of the Control base class.

--

Best regards,

Carlos J. Quintero

MZ-Tools: Productivity add-ins for Visual Studio .NET, VB6, VB5 and VBA
You can code, design and document much faster.
Free resources for add-in developers:
http://www.mztools.com

"Fred" <no****@please.com> escribió en el mensaje
news:%2***************@TK2MSFTNGP11.phx.gbl...

I have created a UserControl and now I need to Override the OnMouseUp,
OnMouseDown, and OnMouseClick Subs but I also need to know if the Shift or
Ctrl key was pressed when the mouse action happened. How can I do that

Thanks
Fred

[Claes Bergefall]

Try the Control.ModifierKeys property

/claes

"Fred" <no****@please.com> wrote in message
news:%2***************@TK2MSFTNGP11.phx.gbl...

I have created a UserControl and now I need to Override the OnMouseUp,
OnMouseDown, and OnMouseClick Subs but I also need to know if the Shift or
Ctrl key was pressed when the mouse action happened. How can I do that

Thanks
Fred

[Armin Zingler]

"Fred" <no****@please.com> schrieb

I have created a UserControl and now I need to Override the
OnMouseUp, OnMouseDown, and OnMouseClick Subs but I also need to
know if the Shift or Ctrl key was pressed when the mouse action
happened. How can I do that

System.Windows.Forms.Control.ModifierKeys()

is a shared property you can evaluate in the procedure.
Armin

[Herfried K. Wagner [MVP]]

"Fred" <no****@please.com> schrieb:

I have created a UserControl and now I need to Override the OnMouseUp,
OnMouseDown, and OnMouseClick Subs but I also need to know if the Shift or
Ctrl key was pressed when the mouse action happened. How can I do that

\\\
If CBool(Control.ModifierKeys And Keys.Control) Then
...
End If
///

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>