CrystalReportViewer
墨江網(wǎng)站制作公司哪家好,找創(chuàng)新互聯(lián)公司!從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項目制作,到程序開發(fā),運營維護(hù)。創(chuàng)新互聯(lián)公司公司2013年成立到現(xiàn)在10年的時間,我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗,來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)公司。
dataset 定義數(shù)據(jù)源
.rpt 文件描述具體報表樣式
再加一個調(diào)用報表的FORM,就可以實現(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
可以用水晶報表設(shè)計報表,水晶報表你要自學(xué),在這里是說不清的,我對水晶報表有一點的了解功能很強大。
首先引用Crystal Reports 9 ActiveX Designer Run Time Library
再添加Crystal Repotr View Control 9控件
在工程資源管理器中右鍵--添加--Crystal Reports 9 新建一個Crystal Reports9報表
設(shè)置數(shù)據(jù)源后將要顯示的字段加入報表內(nèi)。
窗體代碼部分:
Dim m_Report As New CrystalReport1 \'(這個CrystalReport1是你建立的報表的名稱)
Dim m_Connection As ADODB.Connection \'(建立一個ADO連接)
Dim adoRS As ADODB.Recordset
Private Sub Form_Load()
Dim SQL As String
Dim strConnect As String
\' Create and bind the ADO Recordset object
Set m_Connection = New ADODB.Connection
Set adoRS = New ADODB.Recordset
\' Open the connection
strConnect = "你的數(shù)據(jù)庫連接字符串"
m_Connection.Open strConnect
SQL = "查詢語句"
adoRS.Open SQL, m_Connection, adOpenDynamic, adLockBatchOptimistic
m_Report.Database.SetDataSource adoRS\'(動態(tài)設(shè)置報表數(shù)據(jù)源)
Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = m_Report
CRViewer1.ViewReport \'(顯示報表)
Screen.MousePointer = vbDefault
End Sub
此代碼在VB6+SP5+Windows2000 Server下調(diào)試通過
以上代碼參考水晶報表9中文版
這個專業(yè)我也學(xué)得不是很好,用書上得例子吧。
某公司盡力需要了解公司在全國各地得銷售情況,設(shè)計一個水晶報表。統(tǒng)計個地區(qū)得銷售總額和全國總額
準(zhǔn)備工作
用 SQL server 2000 創(chuàng)建一個數(shù)據(jù)庫company 在該數(shù)據(jù)庫中創(chuàng)建一個表Sales.用于儲存區(qū)域銷售數(shù)據(jù)
在表Sales 中添加若干條記錄
設(shè)計報表
打開 Visual Studio.NET創(chuàng)建名為 Salesreport得 WINDOWS應(yīng)用程序 將Form1.cs 名更改為 frmSalesReport.cs
frmSalesReport窗體得屬性設(shè)置里。 吧 frmSalesReport.cs得Text屬性更改為"區(qū)域銷售報表"
把NAME屬性更改為frmSalesReport。
在 VisualStudio.NET 菜單中選擇 項目添加新項。在"添加新項"窗口得“類別”區(qū)域擴(kuò)展 “本地項目項”,選擇數(shù)據(jù),在"模板"區(qū)域選擇"數(shù)據(jù)集" 在"名稱"那將Dataset1.xsd改名 SalesDetaset.xsd
單擊"打開" 將生成一個新得結(jié)構(gòu)文件 SalesDataset.xsd 該文件將顯示在 ADO.NET數(shù)據(jù)集設(shè)計器中。
在VB中,右鍵點擊右面工程視圖中的工程圖標(biāo),點選其中的添加-Data
Environment(
即建立一個數(shù)據(jù)環(huán)境),再點添加-Data
Report
(即建立一個報表)。一般來說VB自帶的報表已能滿足使用要求,如果需要功能更加強大的報表控件,可以選擇水晶報表控件CrystalReport或TrueDBGrid。
當(dāng)前名稱:vb.net如何做報表,vb報表設(shè)計過程
鏈接URL:http://www.muchs.cn/article18/hssedp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站改版、Google、靜態(tài)網(wǎng)站、品牌網(wǎng)站設(shè)計、外貿(mào)建站、App開發(fā)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)