Private Sub btnÜbern_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles btnÜbern.Click
        Try
            Dim Conn As New MySqlConnection(ConnString)
            Dim Com As New MySqlCommand()
            Dim da As New MySqlDataAdapter()
            Com.Connection = Conn
            da.SelectCommand = Com
            Com.CommandText = "SELECT * FROM tabelle"
            Dim cb As New MySqlCommandBuilder(da)
            bindingsource.EndEdit()
            da.Update(dtTabelle)
            Meldung(Status.Info, "Konfiguration wurde gespeichert")
        Catch ex As Exception
            Meldung(Status.Fehler, "btnÜbern_Click: " + ex.Message)
        End Try
    End Sub