[讨论]双循环后再怎么加分页?

电梯直达

1^#

发表于 2010-1-7 01:34:54 | 只看该作者回帖奖励

我写了段代码,首先是先循环了横竖表格,到后来我想给做个分页,可是程序加进去怎么也不出来,老是出现"真"值,
我想问一下怎么才可以实现?
谢谢

2^#

发表于 2010-1-7 01:34:57 | 只看该作者

分页程序的初始化楼主应该会把？那我就不写初始化部分了。
个人经常用的分页循环形式
Dim iPage
For iPage=0 To rs.PageSize
'这里面是循环代码
IF rs.EOF Then Exit For
Next

回复支持反对

3^#

发表于 2010-1-7 01:34:59 | 只看该作者

我就是这样写的,结果错了
因为写列循环的时候也有
IF rs.EOF Then Exit For
Next
所以出错.有没有什么别的方法?
谢谢

回复支持反对

GMT+8, 2024-11-20 07:24 , Processed in 0.107255 second(s), 8 queries , Gzip On, Memcache On.

		自动登录	找回密码
密码			注册