水晶報(bào)表分頁(yè)匯總
建三個(gè)公式字段,第一個(gè)(公式1)輸入下面的公式:
whileprintingrecords;
global numbervar ptotal;
ptotal:=0;
第二個(gè)(公式2)輸入下面的公式:
whileprintingrecords;
global numbervar ptotal;
ptotal := ptotal + [要匯總的字段];
如果要匯總的字段不是數(shù)字,就用tonumber()函數(shù)轉(zhuǎn)換;
第三個(gè)(公式3)輸入下面的公式:
whileprintingrecords;
global numbervar ptotal;
把公式1放在頁(yè)眉,公式2放在詳細(xì)資料,并隱藏公式1和公式2;把公式3放在頁(yè)腳,格式公式3,設(shè)置為你要顯示的格式。這樣就行了。
水晶報(bào)表分頁(yè)并自動(dòng)插入空白行
在論壇上經(jīng)常會(huì)看到水晶報(bào)表分頁(yè)的問(wèn)題,這個(gè)很好解決。
但是自動(dòng)插入空白行的問(wèn)題卻一直沒(méi)有很好的答案,
經(jīng)過(guò)研究找到一個(gè)變通的辦法來(lái)實(shí)現(xiàn)了。
'分頁(yè)
在詳細(xì)資料上點(diǎn)格式化節(jié),在后面頁(yè)新建頁(yè)打勾
公式中輸入:
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
---------------------------------------------------------------------
最后頁(yè)不足,用空行填充:
新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 1) then '第一個(gè),1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
...接著第二個(gè)[ 新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾 ]:
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 2) then '第二個(gè),2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接著第三個(gè)[ 新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾 ]:
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 3) then '第三個(gè),3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
在論壇上經(jīng)常會(huì)看到水晶報(bào)表分頁(yè)的問(wèn)題,這個(gè)很好解決。
但是自動(dòng)插入空白行的問(wèn)題卻一直沒(méi)有很好的答案,
經(jīng)過(guò)研究找到一個(gè)變通的辦法來(lái)實(shí)現(xiàn)了。
'分頁(yè)
在詳細(xì)資料上點(diǎn)格式化節(jié),在后面頁(yè)新建頁(yè)打勾
公式中輸入:
if onlastrecord then
FORMULA = FALSE
else
if RecordNumber mod 5 =0 then
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
---------------------------------------------------------------------
最后頁(yè)不足,用空行填充:
新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 1) then '第一個(gè),1
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
'(BASIC 語(yǔ)法)
...接著第二個(gè)[ 新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾 ]:
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 2) then '第二個(gè),2
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...接著第三個(gè)[ 新增一個(gè)空白詳細(xì)資料行,格式化此節(jié),在抑制顯示(無(wú)深化)打勾 ]:
公式中輸入:
if not onlastrecord then
FORMULA = TRUE
else
if (RecordNumber mod 5 = 3) then '第三個(gè),3
FORMULA = TRUE
else
FORMULA = FALSE
end if
end if
...(同理第四個(gè),即最后5-1個(gè))
(注:此方法適用于行數(shù)較少,上面是為5行為例,不過(guò)不覺(jué)得麻煩,對(duì)行數(shù)較多也可以用)...(同理第四個(gè),即最后5-1個(gè))
您可能感興趣的文章:- ASP.NET中水晶報(bào)表的使用方法詳解
- asp.net 水晶報(bào)表隔行換色實(shí)現(xiàn)方法
- ASP.NET 水晶報(bào)表打印功能實(shí)現(xiàn)代碼
- VS2010 水晶報(bào)表的使用方法
- VS2005 水晶報(bào)表在時(shí)部署時(shí)遇到的問(wèn)題
- 編寫(xiě)的vs2005水晶報(bào)表程序在vs2008下正常使用的一些實(shí)現(xiàn)方法
- .NET 水晶報(bào)表使用代碼
- 什么是水晶報(bào)表與水晶報(bào)表功能分析
- vb.net發(fā)布水晶報(bào)表程序步驟
- 水晶報(bào)表asp.net的webform下基本用法實(shí)例