当前位置: 首页 > 图文教程 > 数据库 > Access > Access报表打印:自动分页
No. « ‹ 4 5 6 7 › »
关键字
问题:
每页打印一定行数后自动分页
方法一:
加一个分页符,在报表的代码界面里面写入以下代码:
方法二:
在报表的代码界面里面写入以下代码:
OptionCompareDatabaseDimrowAsLongPrivateSub主体_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 EndIfEndSub
登陆 还没注册?