获取三个控制键的按键状态

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    If (Control.ModifierKeys And Keys.Shift) = Keys.Shift Then
      MessageBox.Show("Shift be KeyPress")
    End If
  End Sub

其中的Control全部是System.Windows.Forms.Control
ModiferKeys就是对三个键的状态进行检测,对其它键没有效果,并且不要把Keys.Shift写成Keys.ShiftKey了.