1

我想使用带有 linq 的水晶报表 activex 查看器。

Dim crxApp As New CRAXDDRT.Application
Dim crxReport As New CRAXDDRT.Report

crxReport = crxApp.OpenReport(Application.StartupPath & "/Report/Report_Daily.rpt", Nothing)

dim query = From obj_tbl In dbModelAdmin.v_InvoiceReturnings Where obj_tbl.InvoiceId = 2
                      Select obj_tbl

crxReport.Database.SetDataSource(query)
rptDaily.ReportSource = crxReport
rptDaily.ViewReport()

当我运行时,我得到了所有数据,但我想要的是按条件获取数据,如查询。

4

0 回答 0