DataTable 行の削除

For cnt As Integer = dtTest.tblTest.Rows.Count - 1 To 0 Step -1
dtTest.TBLTest(cnt).Delete()
dsTest.TBLTest.Rows(cnt).AcceptChanges()

dsTest.TBLTest.AcceptChanges()
Next cnt

AcceptChanges()で更新してあげないと、
削除された行は空っぽのままになってアクセスエラーとなる。