DataTable.Load是重新加载,而不是筛选,无法撤销,自能重新设置条件重新加载。
你可以用一个全局变量记录上一次加载的条件,比如
If Filter > "" Then
vars("条件") = Tables("S征地记录").DataTable.LoadFilter
Tables("S征地记录").DataTable.LoadFilter = Filter
Tables("S征地记录").DataTable.Load
那么撤销这样
Tables("S征地记录").DataTable.LoadFilter = vars("条件")
Tables("S征地记录").DataTable.Load