[求助]不是从数据库分页加载，而从datatable分页加载到table,怎么写呢 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]不是从数据库分页加载，而从datatable分页加载到table,怎么写呢

共有7072人关注过本帖树形打印复制链接主题：[求助]不是从数据库分页加载，而从datatable分页加载到table,怎么写呢

有点甜

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/8/5 23:16:00 [显示全部帖子]

给楼主说说关键代码，比如加载第n页，每页5行

Dim dt As DataTable = DataTables("表A")

Dim st As Integer = math.min(n * 5 ,dt.DataRows.count -1)

Dim Ed As Integer = math.min((n+1) * 5 - 1,dt.DataRows.count -1)

st = DataTables("表A").DataRows(st)("_Identify")

ed = DataTables("表A").DataRows(ed)("_Identify")

Tables("窗口1_Table1").filter = "[_Identify] >= " & st & " And [_Identify] <= " & ed

主题：[求助]不是从数据库分页加载，而从datatable分页加载到table,怎么写呢