设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

[原创分享]一个简单报表中自动画表格及自动补空行的函数

2008-7-14 10:13| 发布者: 5988143| 查看: 2425| 评论: 3

'=================================================================================================
'-函数名称: ReportFormat
'-功能描述: 对报表进行格式化,
'-输入参数: 参数1:rpt ----需要格式化的报表
'       参数2:  ctlID----设置序号的控件
'       参数3:  FormatMode----格式化样式: 0--方格式,1--横格式,2--竖格式
'       参数4:  FillBlankline----true在最后一页补空行,false在最后一页不补空行
'-返回参数: True 设置成功,False设置失败
'-使用示例: ReportFormat Me, txtID
'-使用注意: 必须有一个作为序号的文本框类控件,将其控件来源设为"=1",运行总和设为"全部之上",
'       最左边的控件必须为主体节中最先创建的控件,如果不是,可以通过将其它控件进行剪切-
'       粘贴操作来实现
'       最右边的控件必须为主体节中最后创建的控件,如果不是,可以通过将其进行剪切-粘贴操
'       作来实现
'-兼 容 性: 不支持报表页眉和报表页脚及自定义节,由于表格行数是以第1页记录数为准,所以当打印
'       数据只有1页时不能实现补空行
'-作    者: 红尘如烟
'-创建日期: 2008年7月13日
'=================================================================================================
*** Hidden to visitors ***


u=2672586023,3500939791&fm=0&gp=-14.jpg


[ 本帖最后由 红尘如烟 于 2008-7-13 22:58 编辑 ]

示例.JPG

示例.rar
(2008-07-13 21:11:07, Size: 25.4 KB, Downloads: 9)

发表评论

最新评论

引用 123shusheng 2009-1-25 21:47
4566666
引用 snddhy 2008-12-9 18:12
怎么要密码呀!请发到我邮箱中snddhy@163.com
引用 边之缘 2008-8-14 10:18
辛苦了

查看全部评论(3)

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-4-29 23:32 , Processed in 0.067148 second(s), 16 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部