[下载]请大家帮忙研究一下报表问题(急)

lgpldn

这是我借用xulanghui用户的数据

http://bbs.office-cn.net/viewFile.asp?Boardid=2&ID=6419

请教如何在每页的报表中实现当前页的小计？

谁能帮帮我，或告诉我在那找到这方面的资料。

谢谢!

Benjamin_luk

如果是:

1. =10

2.=20

3=30

可以做到

1.=10

2.=30

3.=60

[此贴子已经被作者于2004-9-3 11:55:22编辑过]

hi-wzj

其实在数据库里已无所谓页合计这一概念了。过去由于手工汇总，需要先进行页合计，以便于算总合计数。并没有实际的管理意义。现在都是电脑来计算了，这就不是必须的了，上电脑程序时首先是要优化各种流程！下面是实现的代码（例子是页合计“材料报表”报表的“主材数量”字段。）Option Compare Database

Public aa As Double    '要在“Option Compare Database”后先定义一个公用变量Private Sub 页面页脚_Format(Cancel As Integer, FormatCount As Integer)

Me.文本114 = aa       'Me.文本114为要显示页合计的文本框   赋合计值

aa = 0                        '变量清零

End Sub

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

aa = aa + Me.主材数量          '主体格式化时累计“主材数量 ”字段的值

End Sub

lgpldn

[em17]谢谢版主 !