Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles ToolStripButton2.Click
        If MsgBox("Kunden loschen?", MsgBoxStyle.YesNo, "löschen?") = _
        MsgBoxResult.Yes Then
            Me.KundenBindingSource1.EndEdit()
            KundenBindingSource1.RemoveCurrent()
            Me.TableAdapterManager1.UpdateAll(Me.DBZINIDataSet)
Else
        KundenBindingSource1.EndEdit()
End If
    End Sub

? Der Computer ist die logische Weiterentwicklung des Menschen:
Intelligenz ohne Moral.?
(John Osborne, engl. Dramatiker, *1921)