Private Sub DataGridView1_UserDeletingRow(ByVal sender As Object, _
    ByVal e As System.Windows.Forms.DataGridViewRowCancelEventArgs) _
    Handles DataGridView1.UserDeletingRow
        ' Abfrage
        If MessageBox.Show("Sind Sie sicher das Sie Datensätze löschen" & _
          "wollen?", "Zeile löschen", _
        MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation, _
        MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.No Then
            ' Löschvorgang stoppen
            e.Cancel = True
        Else
            ' markierte Zeilen löschen
 
           MessageBox.Show("Daten wurden gelöscht!", _
           "Info!", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End If
    End Sub

VB@rchiv its the Best