Dim 行数 As Double = DataTables("易飞凭证数据").SQLCompute( "Count(TB002)", "Substring(TA003,1,4)='2024'")
DataTables("易飞凭证数据").LoadTop = 行数
DataTables("易飞凭证数据").LoadFilter = "Substring(TA003,1,4)='2024'"
DataTables("易飞凭证数据").Load
我试了我试了这个代码可以加载,有一个问题,加载往年的速度较快(1000条左右数据1秒),但今年的反而很慢(3000条数据11秒),求解