【发布时间】:2017-02-15 13:43:42
【问题描述】:
嗨,我知道这个问题会被认为是重复的,因为有很多关于此类问题的已回答问题,我尝试尝试可能的正确代码或有关此类问题的答案,但我似乎没有运气决定问这个问题。
我在水晶报告中有两个参数,月份和年份我需要从 vb.net 传递这个来显示月度报告,但是在我运行报告查看器后它只显示空纸我想知道这有什么问题和我认为这段代码是正确的,但它显然不起作用我希望你能帮助我谢谢。
'Print stock out monthly report
Dim stockOutMonthlyPeriodReport As New StockOutMonthlyPeriodReport
Dim stockOutMonthlyPeriodViewer As New StockOutMonthlyReportViewer
Dim paramFields As New ParameterFields
Dim param1Field, param2Field As New ParameterField
Dim param1Range, param2Range As New ParameterDiscreteValue
reportTimePeriodTextObject = stockOutMonthlyPeriodReport.Section1.ReportObjects("monthlyTextObject")
reportTimePeriodTextObject.Text = "Monthly Report of " & monthlyReportComboBox.Text & " Year " & monthlyYearReportComboBox.Text
param1Field.ParameterFieldName = "timePeriodMonthName" ' Parameter Name In Crystal Report param2Field.ParameterFieldName = "timePeriodYear" ' Parameter Name In Crystal Report
param1Range.Value = monthlyReportComboBox.Text
param1Field.CurrentValues.Add(param1Range)
paramFields.Add(param1Field)
param2Field.ParameterFieldName = "timePeriodYear" ' Parameter Name In Crystal Report
param2Range.Value = yearlyReportComboBox.Text
param2Field.CurrentValues.Add(param2Range)
paramFields.Add(param2Field)
stockOutMonthlyPeriodViewer.StockOutMonthlyCrystalViewer.ParameterFieldInfo = paramFields 'to pass parameter inf.to CRV
stockOutMonthlyPeriodViewer.StockOutMonthlyCrystalViewer.ReportSource = stockOutMonthlyPeriodReport ' Assign Report Source to CRV
stockOutMonthlyPeriodViewer.Show()
【问题讨论】: