参数无法从vb.net传递到Crystal报表

Question

我正在使用此代码将参数传递给我的Crystal报表，但是在运行时，Crystal报表正在显示用于输入参数的文本框。 请帮我解决这个问题

Dim rpt As New RPT_Maintenance
rpt.SetDataSource(maintenanceDetailsTable)
rpt.SetParameterValue("datefrom", dtpDateFrom.Text)
rpt.SetParameterValue("dateto", DtpDateTo.Text)
rpt.SetParameterValue("cat", "All Vehicles")
FRM_ReportViewer.CrystelReportViewer.ReportSource = rpt
FRM_ReportViewer.ShowDialog()
FRM_ReportViewer.Dispose()

Answer 1

如果参数框不断弹出，则可以在Crystal Report Viewer表单的页面加载中执行以下操作：

Dim param1Fields As New ParameterFields
Dim param1Field As New ParameterField
Dim param1Range As New ParameterDiscreteValue

param1Field.ParameterFieldName = "TeamRoster"
param1Range.Value = Roster.cmbTeams.Text
param1Field.CurrentValues.Add(param1Range)
param1Fields.Add(param1Field)
CrystalReportViewer1.ParameterFieldInfo = param1Fields

Answer 2

您必须将数据源设置为在设置参数之前报告。

reportClass.SetDataSource(source);

reportClass.SetParameterValue("txtCompanyName", companyName);

viewer.SetReportSource(reportClass);