Spekulatius ohne DB: Das tDS schaut in der Tabelle nach der größten ID und haut noch 1 drauf, also wie manuell: Dim NeueID = Tds.DieZieltabelle.Select(Function(x) x.ID).Max + 1 Bzgl. Erst ne Row, dann das Fill: Probier es aus. Entweder geht es genauso oder (was ich eher vermute): Crash mit ConstraintException wegen doppelter ID-Vergabe