以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  分页功能可以i单纯的将一个表分页,而不是分页加载吗?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89436)

--  作者:lovemaders
--  发布时间:2016/8/22 9:54:00
--  分页功能可以i单纯的将一个表分页,而不是分页加载吗?

分页功能可以i单纯的将一个表分页,而不是分页加载吗?

我搜到的都是分页加载的内容,但是我不想要分页加载只是单纯的将一个完整的table分页显示,


--  作者:大红袍
--  发布时间:2016/8/22 9:59:00
--  

参考代码

 

Dim p As Integer = 1
Dim c As Integer = 3
Dim t As Table = Tables("表A")
Dim idxs As String = "-1,"
t.filter = ""
For i As Integer = p*c To p*c+c-1
    idxs &= t.rows(i)("_Identify") & ","
Next
t.filter = "_Identify In (" & idxs.trim(",") & ")"