水晶报表查看器参数不正确

| 我试图将参数传递给Crystal Report Viewer。但显示参数不正确。 
            Dim rpt As New ReportDocument



        rpt.FileName = My.Application.Info.DirectoryPath & \"\\MAuditList.rpt\"
        Dim paramDV As New ParameterDiscreteValue()

        paramDV.Value = frmMachine.machine
        rpt.ParameterFields(\"@mchno\").CurrentValues.Clear()
        rpt.ParameterFields(\"@mchno\").DefaultValues.Clear()
        rpt.ParameterFields(\"@mchno\").CurrentValues.Add(paramDV)
        paramDV.Value = frmMachine.batch - 1
        rpt.ParameterFields(\"@batch\").CurrentValues.Clear()
        rpt.ParameterFields(\"@batch\").DefaultValues.Clear()
        rpt.ParameterFields(\"@batch\").CurrentValues.Add(paramDV)
        paramDV.Value = InpStdPt
        rpt.ParameterFields(\"@Points\").CurrentValues.Clear()
        rpt.ParameterFields(\"@Points\").DefaultValues.Clear()
        rpt.ParameterFields(\"@Points\").CurrentValues.Add(paramDV)
        paramDV.Value = OvrPoints
        rpt.ParameterFields(\"@ovrpt\").CurrentValues.Clear()
        rpt.ParameterFields(\"@ovrpt\").DefaultValues.Clear()
        rpt.ParameterFields(\"@ovrpt\").CurrentValues.Add(paramDV)

        Form1.CrystalReportViewer1.ReportSource = rpt
        Form1.Show()</code>



这些代码中有任何错误吗？
    
2020-02-25 2 条评论
分享

没有找到相关结果

    已邀请:

    催备南菠亨

            您应该将参数分配给Report对象，然后将报表对象分配给CrystalReportViewer。 尝试这样的事情： 
    \'Create report object and load the report
Dim rpt As New ReportDocument()
rpt.FileName = My.Application.Info.DirectoryPath & \"\\MAuditList.rpt\"

\'Set the Parameters
Dim paramDV As New ParameterDiscreteValue()
paramDV.Value = \"Parameter Value\"
rpt.ParameterFields(\"@ParameterName\").CurrentValues.Clear()
rpt.ParameterFields(\"@ParameterName\").DefaultValues.Clear()
rpt.ParameterFields(\"@ParameterName\").CurrentValues.Add(paramDV)

\'Assign the report object to the Viewer Report Source
Form1.CrystalReportViewer1.ReportSource = rpt
Form1.Show()
        
    2020-02-25 0 0
    分享
    为什么被折叠? 0 个回复被折叠

    要回复问题请先登录或注册

    或代码 OrCode.com 备案号：粤ICP备15020848号-1
    Escape time: 0.039212942123413