来自数据集的 Vb.Net 水晶报告

Posted 2023-02-26

【中文标题】来自数据集的 Vb.Net 水晶报告

【英文标题】：Vb.Net crystal report from dataset

【发布时间】：2014-01-16 17:58:07

【问题描述】：

我正在使用 Vb.Net 2010 开发具有水晶报表的项目。我连接到 sqlserver 并使用函数 Adapter.Fill(dataset,"tableName") 填充我的数据集。我现在关心的是如何在水晶报表中显示我的数据集或数据表中的数据？

【参考方案1】：

这里我的代码使用 2 个表 authors 和 titleauthor

'Build a SQL statement to query for the authors table 

Dim sqlString As String = "SELECT * FROM authors"

'Retrieve the data using the SQL statement 

adoOleDbDataAdapter = New OleDbDataAdapter(sqlString, adoOleDbConnection)

'Build a SQL statement to query for the titleauthor table 

sqlString = "SELECT * FROM titleauthor" 

'Retrieve the data using the SQL statement 

adoOleDbDataAdapter2 = New OleDbDataAdapter(sqlString, adoOleDbConnection) 

'Create a instance of a Dataset 

DataSet1 = New DataSet() 

'Fill the dataset with the data with author information 

adoOleDbDataAdapter.Fill(DataSet1, "authors") 

'Fill the dataset with the data with titleauthor information. 
'The table name used in the Fill method must be identical to the name 
'of the table in the report. 

adoOleDbDataAdapter2.Fill(DataSet1, "titleauthor") 

'Pass the dataset to the report   YOU NEED THIS

Dim crReportDocument As New CrystalReport1()


crReportDocument.Database.Tables(0).SetDataSource(DataSet1) 

'View the report 

CrystalReportViewer1.ReportSource = crReportDocument

记住你需要导入

导入 CrystalDecisions.CrystalReports.Engine 导入 CrystalDecisions.Shared