参数名前面写@了吗 看看水晶报表里的参数字段有@吗? 答:参数名前面字@了,水晶报表里的参数字段有@ 我经过测试的代码如下: Dim objRpt As New rptJL_WHMaterial() 'Dim Fields As New ParameterFields() Dim Fields = objRpt.DataDefinition.ParameterFields 'Dim Fields As ParameterFields = objRpt.DataDefinition.ParameterFields 'Dim Fields As CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinition Dim FieldSm As New ParameterField() 'Dim FieldSm = objRpt.DataDefinition.ParameterFields.Item("@strSmall") Dim FieldM As New ParameterField() 'Dim FieldM = objRpt.DataDefinition.ParameterFields.Item("@strMonth") Dim paravalues1 As New ParameterValues() Dim paravalues2 As New ParameterValues() Dim Para1 As New ParameterDiscreteValue() Dim Para2 As New ParameterDiscreteValue() 'Public member 'ParameterFieldName' on type 'ParameterFieldDefinition' not found FieldSm.ParameterFieldName = "?@strSmall" Para1.Value = "'CME'" '"'" & Me.txtSmall.Text & "'" paravalues1.Add(Para1) FieldSm.CurrentValues = paravalues1 FieldM.ParameterFieldName = "?@strMonth" Para2.Value = "'2004-10'" '"'" & Me.txtMonth.Text & "'" paravalues2.Add(Para2) FieldM.CurrentValues = paravalues2 'Public(member) 'Add' on type 'ParameterFieldDefinitions' not found. 'Fields.Add(FieldSm) 'Fields.Add(FieldM)
答:网上这类似的文章我都仔细看过了,还是不行.我想这个问题是比较重要的,请高手指点指点.
看看水晶报表里的参数字段有@吗?
答:参数名前面字@了,水晶报表里的参数字段有@
我经过测试的代码如下: Dim objRpt As New rptJL_WHMaterial()
'Dim Fields As New ParameterFields()
Dim Fields = objRpt.DataDefinition.ParameterFields
'Dim Fields As ParameterFields = objRpt.DataDefinition.ParameterFields
'Dim Fields As CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinition
Dim FieldSm As New ParameterField()
'Dim FieldSm = objRpt.DataDefinition.ParameterFields.Item("@strSmall")
Dim FieldM As New ParameterField()
'Dim FieldM = objRpt.DataDefinition.ParameterFields.Item("@strMonth") Dim paravalues1 As New ParameterValues()
Dim paravalues2 As New ParameterValues() Dim Para1 As New ParameterDiscreteValue()
Dim Para2 As New ParameterDiscreteValue() 'Public member 'ParameterFieldName' on type 'ParameterFieldDefinition' not found
FieldSm.ParameterFieldName = "?@strSmall"
Para1.Value = "'CME'" '"'" & Me.txtSmall.Text & "'"
paravalues1.Add(Para1)
FieldSm.CurrentValues = paravalues1 FieldM.ParameterFieldName = "?@strMonth"
Para2.Value = "'2004-10'" '"'" & Me.txtMonth.Text & "'"
paravalues2.Add(Para2)
FieldM.CurrentValues = paravalues2
'Public(member) 'Add' on type 'ParameterFieldDefinitions' not found.
'Fields.Add(FieldSm)
'Fields.Add(FieldM)
FieldM.ParameterFieldName = "?@strMonth"
Para2.Value = "'2004-10'" 为什么双层引号