Office中国论坛/Access中国论坛

标题: [求助]急!!关于报表中按固定记录数分页及不足行数用空行补足的问题 [打印本页]

作者: 红尘如烟    时间: 2007-6-18 01:38
标题: [求助]急!!关于报表中按固定记录数分页及不足行数用空行补足的问题
需要的报表效果如下图所示:

[attach]24974[/attach]

需要达到的要求:

    1  纸张大小为21X14CM

    2  每页显示记录数为9条

    3  若不足9条记录则用空行补足

    主要的麻烦在于其中有个总计和备注栏,要求每页都需要显示,但只在最后一页中显示数据

    大概意思相当于在一张固定报表中填入数据

    我对报表没啥研究,实在搞不定,请各位大虾帮帮忙,感谢!!!
[attach]24972[/attach]
[em02][em02][em02][em02]


[此贴子已经被作者于2007-6-17 17:52:15编辑过]


作者: tz-chf    时间: 2007-6-18 06:29
自定义一种纸张,用line划线,调整页边距和页面页眉、页面页脚等使主体能显示9条记录。

在报表页眉设一个不可见的文本框得到总计,在页面页脚引用这个文本框。大写的函数论坛上有。

private sub report_page()
report.scalemode=7  '厘米,容易计算

'最好用变量,方便调整

'竖线
line (2,3)-(2,5)
line ....

’横线可用for循环

for....

line...

next
end sub

套打的话多调整几次。

[此贴子已经被作者于2007-6-17 22:30:40编辑过]


作者: sgrshh29    时间: 2007-6-18 23:17
以下是引用红尘如烟在2007-6-17 17:38:00的发言:


    2  每页显示记录数为9条

    3  若不足9条记录则用空行补足

    主要的麻烦在于其中有个总计和备注栏,要求每页都需要显示

问题就难在“主要的麻烦在于其中有个总计和备注栏,要求每页都需要显示”,通常页眉可以重复,而页脚不能重复。可以在页面页眉用线条控件画出需要的格子。将记录的标签放在自定义的分组页面,记录放在主体。用分页符来决定行数。用页面页眉的movelayout来移动自定义分组,达到这个目的。代码虽然简单,但是做起来比较烦。
作者: 红尘如烟    时间: 2007-6-19 04:02
我晕死,只想着怎么才能用代码去实现,却忘记了通过调整控件大小来达到限制其显示记录数这种最简单的办法!已经搞定,在此多谢楼上的两位兄弟的提示![em07][em07][em07]

把文件发上来,有用得着的做个参考,大家不要再犯我这种低级错误了,晕菜,真是丢脸啊[em06][em06][em06]

注:这个需要先自定义一个宽21CMX高14CM的纸张大小,否则会有问题[attach]25100[/attach]


[此贴子已经被作者于2007-6-24 20:18:31编辑过]


作者: sgrshh29    时间: 2007-6-19 05:25
你这个例子好像与你楼顶的要求不符,下面页脚的内容没有紧跟上面主体,中间空开一大截,还是A4的页面。按楼顶的意思应该是所有的内容都是紧挨着的。好像应该是这样的效果.[attach]24992[/attach]


[此贴子已经被作者于2007-6-19 7:06:44编辑过]


作者: 红尘如烟    时间: 2007-6-25 04:25
楼上的兄弟说的是个问题,我是在报表的“页面设置”里直接设置的,但换台电脑设置就变了,我这里用的是自定义纸张,到你那里就成了A4纸了,我把4楼的mdb文件改了下,但是由于ACCESS2000及之前的版本里好像没有Printer对象,也不知道是不是管用
作者: 小宜    时间: 2007-12-28 22:16
学习学习学习学习学习学习学习学习
作者: simq    时间: 2008-9-12 01:16
好好学习好好学习好好学习好好学习
作者: earyxu    时间: 2008-10-17 21:13
学习学习学习学习学习学习学习学习
作者: sznoside    时间: 2009-10-3 02:52
yyyy
作者: sznoside    时间: 2009-10-3 03:50
学习
作者: sznoside    时间: 2009-10-3 03:54
路过看
作者: liumporite    时间: 2010-5-25 15:20
dddddddddddddddddddddddddddddddd
作者: ycxchen    时间: 2010-5-25 16:47
学习学习,但2楼的代码还望有例子来说明一下,不大明。
作者: purplerose    时间: 2015-7-28 20:49
学习{:soso_e100:}
作者: 灰太郎    时间: 2024-8-28 20:19
学习




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3