Dim objDa As New MySql.Data.MySqlClient.MySqlDataAdapter(strSQL, _
          oMySqlConn)
        objDa.Fill(objdtUserMeldung)
        DataGridView1.DataSource = objdtUserMeldung

        Dim cb As MySqlCommandBuilder = New MySqlCommandBuilder(objDa)
        Call verbindung()
        objDa.Update(objdtUserMeldung)