这个意思?
Dim t As Table = Tables("表B")For i As Integer = t.Rows.Count -1 To 0 Step -1 t.Rows(i).deleteNextt.AddNew