本想自動讀取報表的紙張大小，但返回來值都是默認紙張的大小，所以用了
Selest case 詞句，但這樣結(jié)果是紙張的類型不齊全。沒有類型對應(yīng)的紙張的在大小不能正確判斷（此情況下，如果提供的參數(shù)不正確，報表結(jié)果將會變亂。此時只要調(diào)整一下參數(shù)。即得到正確的報表。）。如果有誰能解決此問題，請告知一聲。
以下為新的函數(shù)說明：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
函數(shù)名:RepDetail_Format()
調(diào)用報表必須使用控件：（文本框）
txtRecord_NO 在主體節(jié) 可見 用于顯示記錄號，可選
txtTotGrp 在主體節(jié) 不可見 =Count(*) 用于取得報表的總記錄數(shù)，必須
txtCurrentPage 在主體節(jié) 不可見 =[Page] 用于取得當前頁數(shù)，必須
參數(shù)說明： RepName 報表名稱 （當前報表可用 (Me), 其它報表可用：(Reports.報表名)引用），必須
txtCurrentPage 報表主體節(jié)上的[txtCurrentPage]文本框控件 ,必須
txtRecordNum 報表定義的私人變量 數(shù)據(jù)類型:Integer 用于記錄數(shù)的遞增，必須
（注：在報表模塊頂部聲明 ： Private txtRecordNum As Integer ）
txtTotGrp 報表主體節(jié)上的[txtTotGrp]文本框控件 ，必須
IntPrintLen 報表打印的行數(shù)。
-----數(shù)據(jù)類型:Integer （注：不可超過每頁允許的最大記錄數(shù)），可選，（默認：25 行）
DouPageLine 報表主體記錄部分打印長度。
-----數(shù)據(jù)類型:Double （注：不可超過每頁允許的最大記錄數(shù)），可選，（默認：21 CM ）
FontSize 報表記錄部分字號。
-----數(shù)據(jù)類型:Integer （注：不可超過每頁允許的最大記錄數(shù)），可選，（默認：0 字號不變）
txtRecord_NO 記錄序號文本框名稱。
-----數(shù)據(jù)類型:String （注：不可超過每頁允許的最大記錄數(shù)），可選，（缺省為沒有使用）
使用方法：
1,先定義一私人變量：Private txtRecordNum As Integer,必須
2,報表主體節(jié)的格式化事件中調(diào)用（Detail_Format 事件）
調(diào)用方法：NextRecord=RepDetail_Format(RepName , txtCurrentPage.text , txtRecordNum , txtTotGrp.text , IntPrintLen)
使用示例：NextRecord = RepDetail_Format(Me, [txtCurrentPage], txtRecordNum, [txtTotGrp], 20)
本函數(shù)由 binuochao (許偉軍) 完成。制作于2003-06-27 Email:binuochao@sina.com.cn QQ:10077241
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
|
|站長郵箱|小黑屋|手機版|Office中國/Access中國
( 粵ICP備10043721號-1 ) 