Office中国论坛/Access中国论坛

标题: 如何在报表最后一页列印空白表格线补满一页？ [打印本页]

作者: yuab 时间: 2002-3-13 15:42
标题: 如何在报表最后一页列印空白表格线补满一页？
如何在报表最后一页列印空白表格线补满一页：
条件1：不要产生新的空白记录到数据表中。
条件2：不要产生新的临时表。
各位请想想办法！
我的思路不知行不行得通。
用ADO取得报表来源数据。然后在ADO数据源中操作记录，发现最后一页不够记录时。新增相应数量的空白记录在ADO内存中，但不能影响数据表。数据表中不要产生空白记录。
是否有办法？

(报表设计-相关文章技巧链接)：
Access实现在报表最后一页列印空白表格线补满一页(补空行)

作者: tmtony 时间: 2002-3-13 17:29
我以前都是用临时表来做的。
不过我现在有一个新的想法，在报表里使用VBA，有个概念了，还要细化及测试才行。
迟些做个例子看看是否行得通

作者: yuab 时间: 2002-3-13 17:36
tony:
那太好了，我正在为这愁着呢？

作者: tmtony 时间: 2002-3-13 17:43
只是囿于想法，有难题时或走不通时再与你商讨

作者: tmtony 时间: 2002-3-13 19:32
功能基本已实现，但在完善前。
我现在有个问题想控讨一下，如何准确获得最后一页发生的记录数。
因为第一页有报首，最后一页有报尾（且未满），所以可能各页发生的记录数不同

[此贴子已经被tmtony于2002-3-13 11:32:18编辑过]

作者: yuab 时间: 2002-3-13 20:56
我将报表首的内容放在页眉上也就是每一页的页眉页尾是一样的，所以每页的可放的记录数也一样。
例如：每页30笔，共3页
实际笔数为65笔，最后一页有5笔、需增加25笔。
rs.recordcount=总笔数
25笔=30-(rs.recordcount mod 30)
在这种条件下如下补满

作者: tmtony 时间: 2002-3-14 01:23
实在没有太多时间,先做了个测试版,大致实现功能.(借签了Green Ng兄的代码)

不过为了调动大家讨论的积极性,我在程序加了个密码,只有第一个解答了后面的有关如何改变窗体设计时的标尺的尺寸的问题的网友将首先获得密码,其它网友要等到明天才能得到公开的密码. 所有版主在版主要务栏目获得密码

文件下载

[此贴子已经被tmtony于2002-3-13 17:23:16编辑过]

作者: yuab 时间: 2002-3-14 23:03
tmtony:谢谢你
我已搞定啦，照你的思路去做不会有错的。

作者: MsAccess 时间: 2002-3-15 16:12
微软的KB上就有答案。

作者: yuab 时间: 2002-3-18 15:56
kb在哪里啊

作者: MsAccess 时间: 2002-3-18 16:31
http://search.support.microsoft.com/kb/c.asp?fr=0&SD=GN&LN=EN-US

作者: DamoPlus 时间: 2002-4-8 16:20
密码在哪儿啊？

作者: tmtony 时间: 2002-4-8 16:27
pass: yuab

作者: lclc 时间: 2003-3-12 04:40
请问现在有更好的办法解决上面的表格画线问题吗？有不需要运用报表页脚的方法吗？

作者: 九阳先生 时间: 2003-3-12 05:41
标题: 如果报表只有一页，可以使用报表中包含子报表的方式。因为在主报表中可以为子报表设
如上

作者: cg1 时间: 2003-4-25 07:42
同意 MsAccess ，6-7年前就看见过类似代码了，才几行代码，也没用临时表

作者: Trynew 时间: 2003-4-25 17:56
[attach]257[/attach]
用了固定行数空表，不算临时表吧？
再用UNION.

作者: ail 时间: 2003-4-26 19:57
请问如何应用在分类打印的报表上呢？

作者: ail 时间: 2003-4-28 04:40
是否我表达不清楚，大家可以回复告之

作者: hanmei_10 时间: 2004-3-11 19:50
为什么我改成f = 24 - (f Mod 24)后，一行表格都不添加了

作者: hanmei_10 时间: 2004-3-11 19:55
还会多出一页来，是什么原因呢

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)