删除的行,压入到集合里面,如
Dim ls As new List(Of Row)Dim t As Table = Tables("表A")Dim r = t.Rows(2)r.deletels.add(r)r = t.Rows(7)r.deletels.add(r)
msgbox("在你需要保存的时候,再考虑保存")ls(0).savels(1).save