十年網(wǎng)站開發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營維護(hù)+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
你用的紙張格式,大小先確定;分清放的是縱向,還是橫向! 三聯(lián)紙與A4紙縱向橫向容易混淆。 在VS中,RPT右鍵 —— 打印機(jī)設(shè)置 這調(diào)整 ,需要反復(fù)調(diào)試,雖然麻煩,但只有這一種辦法。 我也曾在這點(diǎn)郁悶了一個星期,還是一點(diǎn)一點(diǎn)調(diào)好了! 預(yù)祝你成功!
創(chuàng)新互聯(lián)公司自成立以來,一直致力于為企業(yè)提供從網(wǎng)站策劃、網(wǎng)站設(shè)計(jì)、網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站設(shè)計(jì)、電子商務(wù)、網(wǎng)站推廣、網(wǎng)站優(yōu)化到為企業(yè)提供個性化軟件開發(fā)等基于互聯(lián)網(wǎng)的全面整合營銷服務(wù)。公司擁有豐富的網(wǎng)站建設(shè)和互聯(lián)網(wǎng)應(yīng)用系統(tǒng)開發(fā)管理經(jīng)驗(yàn)、成熟的應(yīng)用系統(tǒng)解決方案、優(yōu)秀的網(wǎng)站開發(fā)工程師團(tuán)隊(duì)及專業(yè)的網(wǎng)站設(shè)計(jì)師團(tuán)隊(duì)。
水晶報表按照你說的輸出的話,必須先在數(shù)據(jù)源上。對數(shù)據(jù)進(jìn)行處理。
數(shù)據(jù)源的流是一條一條來進(jìn)行的。你給的數(shù)據(jù)都是單個蘋果的。
5類蘋果一行表示的話。得追加數(shù)據(jù)加工的算法。將所有
大 蘋果 0.36
大 蘋果 0.25
小 蘋果 0.12
小 蘋果 0.21
小 蘋果 0.20
……
變成5個列的數(shù)據(jù)形式。然后再創(chuàng)建一個新的數(shù)據(jù)源給水晶報表。
關(guān)于數(shù)據(jù)加工,個人建議,你可以寫個存儲過程。直接一步到位。
用一個游標(biāo)遍歷所有數(shù)據(jù)。5條記錄組合成一條。一次創(chuàng)建。
最后將組合的新表交給水晶報表就可以。
如果是FineReport報表,有兩種方法,一種是需要將數(shù)據(jù)源放在你們本地或網(wǎng)絡(luò)的服務(wù)器上,這樣換一臺機(jī)器數(shù)據(jù)源也不會出問題;另一種就是打包時將所用數(shù)據(jù)也一并打包,了。樓主可以試一下水晶報表,應(yīng)該是一個原理。
CrystalReportViewer
dataset 定義數(shù)據(jù)源
.rpt 文件描述具體報表樣式
再加一個調(diào)用報表的FORM,就可以實(shí)現(xiàn)簡單的報表功能
Option Explicit
dim Report as New Cystal1
Private Sub Form_Load()
Screen.MousePointer = vbHourglass
'調(diào)用水晶報表時置鼠標(biāo)為沙漏狀 CRViewer91.ReportSource = Report '該語句的賦值將在后面被修改
CRViewer91.ViewReport
Screen.MousePointer = vbDefault '調(diào)用水晶報表完成后置鼠標(biāo)為默認(rèn)形狀
End Sub
Private Sub Form_Resize()
CRViewer91.Top = 0
CRViewer91.Left = 0
CRViewer91.Height = ScaleHeight
CRViewer91.Width = ScaleWidth
End Sub