VB数据库之分页显示记录——实例04

概述 分页显示记录正如我们在大学里选课时遇到的，每页显示多少科目，共有多少页。其实，这里主要用到的是Data Grid控件。接下来我来介绍一下关于它的知识。 一.原理：将原记录页的数据复制到一个新的记录集中，再将其绑定到Data Grid控件上，这样就能显示原记录页中的所有数据了！正如，我们要将母鸡下的蛋放进篮子里，我们吃的时候要从篮子里拿一样！ 这里的新纪录集就相当于篮子！ 二、关于Data Gri

分页显示记录正如我们在大学里选课时遇到的，每页显示多少科目，共有多少页。其实，这里主要用到的是Data GrID控件。接下来我来介绍一下关于它的知识。

一.原理：将原记录页的数据复制到一个新的记录集中，再将其绑定到Data GrID控件上，这样就能显示原记录页中的所有数据了！正如，我们要将母鸡下的蛋放进篮子里，我们吃的时候要从篮子里拿一样！

这里的新纪录集就相当于篮子！

二、关于Data GrID控件

pagesize:一个记录中包含记录的个数

pagecount：返回一个记录集的记录页总数

absolutepage：返回当前记录页编号

三、编写流程

四、关于分页显示部分代码解析

public sub showdata(byval intpage as integer)

'实现分页显示记录功能

dim objdatasource as new recordset 'objdatasource ’相当于原理中的篮子，即新的记录集

dim intpagecount as integer,intrecord as integer

'intpagecount表示共有多少条记录

’intrecord表示第几条记录

for intrecord = 0 to objrs.fIEld.count-1 '表示记录的字段数

objdataresource.fIElds.appendobjrs.fIElds(intrecord).name,advarchar,objrs.fIElds (inttecord).definedsize '插入字段名append为插入方法

'objrs相当于原记录集

next

......

end sub

总结

以上是内存溢出为你收集整理的VB数据库之分页显示记录——实例04全部内容，希望文章能够帮你解决VB数据库之分页显示记录——实例04所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。