你给的代码不完整,因此,我也就没有办法在你的代码上完成你的要求,那我就给你制作"下一页"即分页的程序流程吧,学到方法更重要:分页的思路:1.定义一下RecordSet对象的PageSize即每页的记录数2.定义一下RecordSet对象的absolutepage即定义当前为第几页3.加一个记录记录数的变量,并递增注意头两步顺序不能颠倒具体如下:ObjRs.open ………… '创建RecordSet对象ObjRs.pagesize=3 '定义每页的记录数ObjRs.absolutepage=Page '定义当前是第几页i=0 '记录数记数器变量do while not ObjRs.eof and i