当前位置: 首页 > 图文教程 > 数据库 > Access > Access报表打印:自动分页

Access
Access数据库技术(16)
Access数据库技术(17)
Access数据库技术(18)
Access数据库技术(19)
Access数据库技术(20)
Access数据库技术(21)
Access数据库技术(22)
Access数据库技术(23)
Access数据库技术(24)
Access数据库技术(25)
Access数据库技术(26)
Access数据库技术(27)
Access数据库技术(28)
Access数据库技术(29)
Access数据库技术(30)
Access数据库技术(31)
Access数据库技术(32)
Access数据库技术(33)
Access数据库技术(34)
Access数据库技术(35)

Access报表打印:自动分页


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-17   浏览: 92 ::
收藏到网摘: n/a

问题:

每页打印一定行数后自动分页

方法一:

加一个分页符,在报表的代码界面里面写入以下代码:

方法二:

在报表的代码界面里面写入以下代码:

以下为引用的内容:

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