国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 數據庫 > Access > 正文

解讀Access報表打印――自動分頁

2024-09-07 19:03:55
字體：大 中 小
來源：轉載
供稿：網友

問題：

每頁打印一定行數后自動分頁

方法一：

加一個分頁符，在報表的代碼界面里面寫入以下代碼：

以下為引用的內容：
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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 香格里拉县| 博乐市| 林西县| 信丰县| 洪湖市| 霍州市| 平乡县| 和田市| 治县。| 会泽县| 神池县| 肥乡县| 郧西县| 勐海县| 安达市| 万州区| 保山市| 蒙山县| 罗山县| 柳江县| 安康市| 大方县| 阿拉善右旗| 台东县| 开远市| 沭阳县| 札达县| 无棣县| 长寿区| 南岸区| 曲松县| 太谷县| 句容市| 抚宁县| 武定县| 芷江| 景东| 乐陵市| 双牌县| 攀枝花市| 南丹县|