[RESOLVED] Shortcut keys do not work

[gate7cy]

What exactly are trying to do? Get the button1 to perform click? What keys you want to use to enable this shortcut? the control button and P? If, yes the try this:

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyData = Keys.Control And e.KeyData = Keys.P Then
Me.Button1.PerformClick()
End If
End Sub

[jmcilhinney]

What exactly are trying to do? Get the button1 to perform click? What keys you want to use to enable this shortcut? the control button and P? If, yes the try this:

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyData = Keys.Control And e.KeyData = Keys.P Then
Me.Button1.PerformClick()
End If
End Sub

How can e.KeyData be equal to Keys.Control and equal to Keys.P at the same time? As has been established by post #3, you have to compare e.KeyData to (Keys.Control Or Keys.P), but this has already been explained to gautamshaw in their own thread on this topic, where they asked this exact same question.