access 报表中序号自动_学会在Access报表中补空行和自动加序号的方法

我一直用微软的Access数据库储存学校所有学生的数据，义务教育档案的整理全部依赖于这个数据库。虽然在用Access，但懂得并不是很多，也就是照猫画虎而已。在整理档案的过程中出现两个问题一直困扰着我，一个就是在打印报表的时候数据不足15个的时候，下面总是有空白，很不美观，另外一个就是在档案中的表册都有序号，但是通过查询出来的一些间隔数据的序号还得另加字段，很是

，表册多的话，更是烦人。

没办法，只得把数据库里面的数据复制到电子表格中通过手工加上表格线和序号。今天想到何不从网上找找看，有没有办法解决这两个问题。晚上花了不少时间从网上搜索相关的资料，终于把这两个问题解决了，很是高兴。

第一个问题是在数据不足一页的时候补上空行，需要的代码比较多，(其实我也不怎么懂代码，能看懂的改成自己的就行了，

)也是非常复杂的，不太懂，也就不帖出来了，我有实例文件保存，呵呵。

1、在要补充空行的报表空白处右击，选择“事件生成器”→“代码生成器”，粘贴如下代码：

Private Sub 主体_Format(Cancel As Integer, FormatCount As

Integer)

SetDetailFormat Me, Txt总计数, 15,

0　　''15是每页的记录数(一般为15)

End Sub

Private Sub Report_Open(Cancel As

Integer