主题：如何获取已经删除的行的集合

参考代码

Dim drs1 As List(Of DataRow) = DataTables("表A").SQLSelect("")
Dim drs2 As new List(Of DataRow)
For Each dr As DataRow In drs1
    If DataTables("表A").Find("_Identify = '" & dr("_Identify") & "'") Is Nothing Then
        drs2.add(dr)
    End If
Next
msgbox(drs2.count)

 要自己做个功能。删除的行，用一列记录，然后筛选或加载的时候，不显示这一行。

 恢复行，就把那一列的记录修改即可。