slogan
专业知识问答平台！
问题：每页打印一定行数后自动分页方法一：加一个分页符，在报表的代码界面里面写入以下代码：OptionCompareDatabase
Me.PageBreak18.Visible=Truerow=-1ElseMe.PageBreak18.Visible=FalseEndIfEndSub方法二：在报表的代码界面里面写入以下代码：OptionCompareDatabase
PrivateSub主体_Format(CancelAsInteger,FormatCountAsInteger)row=row+1IfMe.Section(acDetail).ForceNewPage=1Then
©本文版权归作者所有，任何形式转载请联系我们：xiehuiyue@offercoming.com。
