标题 | access报表打印如何自动分页 |
范文 | 问题: 每页打印一定行数后自动分页 方法一: 加一个分页符,在报表的代码界面里面写入以下代码: optioncomparedatabase dimrowaslong dimrowsinpageasinteger privatesub主体_format(cancelasinteger,formatcountasinteger) rowsinpage=7 row=row+1 ifrow>=rowsinpagethen me.pagebreak18.visible=true row=-1 else me.pagebreak18.visible=false endif endsub 方法二: 在报表的代码界面里面写入以下代码: optioncomparedatabase dimrowaslong privatesub主体_format(cancelasinteger,formatcountasinteger) row=row+1 ifme.section(acdetail).forcenewpage=1then me.section(acdetail).forcenewpage=0 else ifrowmod7=0then me.section(acdetail).forcenewpage=1 row=0 endif endif endsub |
随便看 |
|
在线学习网范文大全提供好词好句、学习总结、工作总结、演讲稿等写作素材及范文模板,是学习及工作的有利工具。