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

红尘如烟

'=================================================================================================
'-函数名称： 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 编辑 ]

tmtony

照收不误!!

简

看你的帖子内容还要迈道坎，不过迈这个坎也值得。

goto2008

[:50]

蓝天8390

这个功能的确非常有用

fxtest

[:50] [:50]

wjb5645

新东东,好

wjb5645

晕呀,哪的问题?

gggggg83

thanks a lot.
...

mcs0403

学习[:50]