Public Class Form2
    Inherits System.Windows.Forms.Form
 
#Region " Vom Windows Form Designer generierter Code "
 
#End Region
 
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Me.KeyPreview = True
    End Sub
 
    Private Sub Form2_KeyDown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
        Select Case True
            Case ((e.Modifiers = Keys.Control) AndAlso (e.KeyCode = Keys.G))
                Debug.WriteLine("CTRL+G pressed!")
            Case Else
                Debug.WriteLine("Unknown keycode")
        End Select
    End Sub
 
End Class