Hi all,

I have the following example procedure that checks if the SHIFT key is held down when I left mouse click. I want to be able to check for a combination of keys such as CTRL-SHIFT but can figure out how to do it. The 2nd code snippet is what I have tried with no success...


THIS WORKS AS EXPECTED:
   Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown

        If e.Button = MouseButtons.Left Then

            If Control.ModifierKeys = Keys.Shift Then
                'Do something...
            Else
                'Do something else...
            End If

        End If

    End Sub

THIS DOES NOT WORK:
    Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown

        If e.Button = MouseButtons.Left Then

            If Control.ModifierKeys = Keys.Shift AndAlso Control.ModifierKeys = Keys.Control Then
                'Do something...
            Else
                'Do something else...
            End If

        End If

    End Sub


Any help appreciated...

I think your problem here is that you are trying two separate comparisons, and both are false. The reason for this is that when two keys are pressed down, the values are combined in a bitwise value. It probably works something like as follows:

Shift = 1
Control = 2
Alt = 4

Therefore, if shift and control are both pressed, the value in control.modifier keys will be 1 + 2 = 3. Thus, the comparision

is really

if 3 = 1 andalso 3 = 2

what we need is ' if 3 = 3 ' which we'll get by doing the following

I think this should work.

Excellent explanation...I actually figured this out and should have posted my result. Thanks for taking the time to respond. Much appreciated.