在Winforms上单击按钮时按住SHIFT的事件句柄

Question

我的Visual Basic.NET项目表单（VS 2013）中具有以下事件句柄。

我想知道是否可以对其进行修改，以便区分正常单击和SHIFT按下按钮时有人按住任一按钮。

Private Sub btnLLDoubleDip_Click(sender As Object, e As EventArgs) Handles btnLLDoubleDip.Click
    ' Double Dip is easy...

    ' Stop the timer

    ' Create a flag that this is now a double dip attempt, NO MORE WALK OUTS
End Sub

Answer 1

您可以为此使用ModifierKeys.HasFlag函数：

If ModifierKeys.HasFlag(Keys.Shift) Then
  MessageBox.Show("Shift is pressed")
Else
  MessageBox.Show("Shift is not pressed")
End If