如何在Access数据库的报表计算当前页的数量

ly_19811105

如题，一直没有办法解决，请各位高手帮一下忙。因为工作需要，要用到Access的报表，但我做报表会有很多页，老大要求每页打印一个TOTAL数，本人菜鸟一名，只会用SUM函数在报表页尾做一个整个表的汇总，不会每页一个汇总，那位高手帮一下忙，小弟万分感谢！！！！

咱家是猫

这类问题如果用下搜索,肯定能找到你要的答案的.在论坛上搜关键字"页合计"

zhaoxyong

'以access自带的罗斯文数据库的产品表为例.
'以产品表生成一个报表

Option Compare Database
Dim Totalsum As Long

Private Sub 页面页脚_Format(Cancel As Integer, FormatCount As Integer)
Me.txt_小计 = Totalsum
End Sub

Private Sub 页面页眉_Format(Cancel As Integer, FormatCount As Integer)
  Totalsum = 0 '初始化
End Sub

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

Totalsum = Totalsum + Me.订购量

End Sub

ly_19811105

多谢大侠的提点，多谢多谢，我回去试试先，太感谢了，再多说一个