Private Sub frmRute_KeyPress(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress
        If e.KeyChar = Chr(75) Then
            e.Handled = True
            MsgBox("Test")
        End If
    End Sub