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


  共有5770人关注过本帖树形打印复制链接

主题:[求助]不是从数据库分页加载,而从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

 回到顶部