我有水晶报告的问题 . 这就是场景 .
我想从vb.net打印到打印机 - > crystal Report - > Printer .
有一个名为DOType的空白字段 . 当我运行该程序时,我想打印1个原件(空白字段称为DOType已更改为“原始”)和2个副本(空白字段称为DOType已更改为“COPY”)
这是我的代码:
Dim cryRpt As New ReportDocument
cryRpt.Load("RASManualDeliveryOrder.rpt")
Dim crParameterDiscreteValue As ParameterDiscreteValue
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefintion As ParameterFieldDefinition
Dim crParameterValues As ParameterValues
crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields
crParameterFieldDefintion = crParameterFieldDefinitions.Item("@DOType")
crParameterValues = crParameterFieldDefintion.CurrentValues
crParameterDiscreteValue = New CrystalDecisions.Shared.ParameterDiscreteValue
crParameterDiscreteValue.Value = "ORIGINAL"
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldDefintion.ApplyCurrentValues(crParameterValues)
Form1.CrystalReportViewer1.ReportSource = cryRpt
Form1.CrystalReportViewer1.Refresh()
Form1.Show()
在“crParameterFieldDefintion = crParameterFieldDefinitions.Item(”@ DOType“)中发生错误”
显示错误:索引无效 . (HRESULT异常:0x8002000B(DISP_E_BADINDEX)
任何的想法 ?