- 1PS提示：因為圖層已鎖定，無法編輯圖層的處理方法
- 2picacg蘋果版怎么找不到|picacg ios版是不是下架了介紹
- 3Adobe Illustrator CS5 序列號大全
- 4ACDsee注冊碼免費分享（含ACDsee18、ACDsee10等版本）
- 5Potato(土豆聊天)怎么換頭像|Potato app更改頭像方法介紹
- 6PDF瀏覽器能看3D文件嗎？PDF瀏覽器看3D文件圖文詳細教程
- 7Potato(馬鈴薯聊天)怎么注冊不了|Potato不能注冊處理方法介紹
- 8最新的Adobe Illustrator CS4序列號大全
- 9Intel i7-9700K性能跑分曝光：同代提升約12%
- 10qq郵件是否已讀怎么看 QQ郵箱已經發出去的郵件怎么知道對方是否已經查看
- 11XP系統怎么清除緩存？
- 12Intel Z390主板有望10月8日公布：8核9代酷睿隨后登場
[摘要]問題：每頁打印一定行數后自動分頁方法一：加一個分頁符，在報表的代碼界面里面寫入以下代碼：OptionCompareDatabaseDimrowAsLongDimRowsInPageAsInteger...
問題：
每頁打印一定行數后自動分頁
方法一：
加一個分頁符，在報表的代碼界面里面寫入以下代碼：
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
Microsoft Access在很多地方得到廣泛使用，例如小型企業，大公司的部門。
推薦資訊 總人氣榜
最新教程 本月人氣
- 1Access給字段添加有效果性
- 2PHP數據庫鏈接類(PDO+Access)案例
- 3怎么使用c#設置ACCESS數據庫
- 4通知我軟件怎么打開Accessibility service服務？_手機軟件圖文說明教程
- 5Access9.8 保存新建的查詢
- 6Excel中的數據怎么導入到Access數據庫中?
- 7Apache的Mode Rewrite模塊與.htaccess文件配合
- 8Excel工作表怎么導入Access數據庫數據
- 9怎么拆分復制的Access 97數據庫
- 10Access怎么含糊參數進行分頁查詢代碼
- 11在Access2007“迅速訪問工具欄”添加更多命令
- 12Java怎么連接Access數據庫_Javascript圖文說明教程
- 1獵豹瀏覽器搶票不受12306新版驗證碼影響
- 2360手機助手紅包怎么提現 360手機助手紅包提現設置流程
- 3160wifi遠程桌面怎么連接 160wifi遠程桌面連接設置方法
- 4微信PC版1.0.7.33官方下載公布 修好bug優化軟件
- 5ios9不越獄怎么恢復短信與照片 ios9不越獄恢復短信與照片圖文說明教程
- 6抱抱app怎么玩 抱抱app使用圖文說明教程圖
- 7抱抱app免費隨機通話使用圖文說明教程(圖文流程)
- 8yy游戲直播怎么開 yy游戲直播打開方法
- 9手機登12306驗證碼總是出錯處理方法介紹
- 10Linux內核4.2優化了哪一些地方？
- 11linux系統使用命令維護RHCS的方法
- 12Linux系統Dalvik堆內存的管理與回收介紹
相關文章
