回复5楼,用分页加载之后,就不能直接用筛选了,要直接用Load。
前面的代码不变,在最后的时候,改一下。
Tables("xxx").Filter = Filter
改成
Tables("xxx").DataTable.LoadFilter = Filter
Tables("xxx").DataTable.Load