Private Sub DGAnzeige_KeyDown(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.KeyEventArgs) Handles DGAnzeige.KeyDown
        'Wenn der User ESC drückt.
        If e.KeyCode = Keys.Tab Then
            Me.DialogResult = DialogResult.Abort
            Me.Close()
        End If
    End Sub

Gru? Rub

(PS: Besuch doch mal meine Seiten http://e-liquids.de und http://jjpassion.de)