[PYTANIE] Wyzwolenie zdarzenia poprzez wciśnięcie klawisza

[JachuPL]

Cześć, mam taki drobny problem. Guglowałem sobie troszkę i znalazłem taki oto kodzik do uruchamiania zdarzeń z Button1 przez klawisz F1. Po skompilowaniu jednak nie działa tak jak trzeba (pod button1 mam podpięty póki co msgbox do testów). Czy coś jeszcze trzeba importować? z góry dzięki za odpowiedź i pozdrawiam

 

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyData
            Case Keys.F1
                Button1.PerformClick()
            Case CType((Keys.Control + Keys.D), Keys)
                MsgBox("TEST")
        End Select
    End Sub

[iVeeid]

Spróbuj po prostu

 

Public Class Form1


    Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
        If e.KeyCode = Keys.F1 Then
            MsgBox("F1 Nacisnieto !")
        End If
    End Sub

End Class

[JachuPL]

podziękował. Po restarcie systemu nie wiedzieć czemu, ale obydwa kody (mój i Twój) zaczęły działać. Temat został wyczerpany, można go zamknąć.