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

红尘如烟

'=================================================================================================
'-函数名称： 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日
'=================================================================================================

游客，如果您要查看本帖隐藏内容请回复

[ 本帖最后由 红尘如烟 于 2008-7-19 00:47 编辑 ]

baizimu001

学习中，非常感谢！

wanyb

学习一下，多谢啦!!

ardu95

学习一下

百舸争流

好好

gzkrmch

看一下

xlb004

11111111111111111

hzyubin

学习一下，多谢分享！

chentaoww

对报表进行格式化,

Alashome

good

hwhwenha01

学习啊学习啊学习啊学习啊学习啊