主题：[求助]如何设计并实现分页加载按钮？

此主题相关图片如下：分页.png

这是ft论坛的分页加载。这个该如何设计并实现？

几个Label 和一个文本框. 和一个按钮

分页你不是做了么？要加载那一页，只需要设置Loadpage啊

我只会做首页，上一页，下一页，末页。

但类似与论坛上的这种动态显示也，比如当前是第几页，共计多少页，这是怎么统计出来的？

 TotalPages得到全部页数

 

LoadPage设置要加载哪一页

此主题相关图片如下：04.png

我改为了这种方式。

问题1.总页数4是对的。为什么起始页是0，应该是1吧。

问题2.好像对各种状态筛选的数据不生效。

1、你可以在原来基础上加1啊

 

2、不理解你说什么

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:临时版本跟踪系统26.rar

上例子。

临时版本跟踪表------状态筛选，发现选择了某个状态，第几页/总页数不会自动变换。

 加入代码

 

If e.Sender.Checked Then
    DataTables("临时版本跟踪表").LoadFilter = "状态 = 'Submitted' "
    DataTables("临时版本跟踪表").Load()

    e.Form.Controls("TextBox1").Value = DataTables("临时版本跟踪表").LoadPage + 1 & "/" & DataTables("临时版本跟踪表").TotalPages

    Tables("临时版本跟踪表").Sort = "需求编号 DESC"
End If

哦。

问题1.当筛选的数据为空，竟然显示1/0，应该是0/0吧。

问题2.当选择了published单选按钮，处于2/2时.再次选择Bound发现变为了2/1了。应该是1/1.

问题3.单击单选按钮，然后再次点击了其他的按钮，比如全部，那么单选按钮应该自动由选中变为没有选中状态。可发现单选按钮仍然处于已被选中的状态，但没生效。