主题：分页只加载分页后的多余行

With DataTables("采购申请表")
    .LoadFilter = ""
    .LoadPage = .TotalPages - 1
    .LoadTop =  20 '每页20行
    .LoadOver =  "申请单号"
    .LoadReverse = True
    .Load()
    e.Form.Controls("TextBox1").Value = 1 & "/" & .TotalPages
End  With

不可能，筛选用法不会到后台重新加载数据。肯定是触发了重新加载的代码

用法完全一样啊，看2楼

不用改的。这个代码有什么问题？

这不合理啊，加载的本来就是最后一页，怎么能显示为第一页，而且也容易导致计算混乱。不然你倒序加载好了，

TotalPages 要加载过一次才能取得到值，只能加载2次，或者使用sql到数据库自己计算一下

select count(*) / 20  from {表A}