vb.net - 如何从vb.net中的文本框传递 Crystal 报告中文本字段中的值

Question

我想在 vb.net 的 Crystal 报表中有一个字段，我想在这个文本字段中显示 vb.net 形式的文本框的值。

我创建了名为“prog_user”的参数并将其值设置为 textbox.text 但它不显示任何内容。

继承人我的代码我把它放在 vb.net 中的 report_viewer_shown 事件上

Dim crpath, filepath As String



        Private Sub rpt_viewer_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown               

                       cryrpt = New CrystalDecisions.CrystalReports.Engine.ReportDocument()
                        crpath = "D:\LEGAL\NLRC_new_022213\NLRC"
                        filepath = crpath & "\Legal Records.rpt"
                        cryrpt.Load(filepath)

                        cryrpt.RecordSelectionFormula = "{Command.CaseNo} = " & case_no
                        crviewer.ReportSource = cryrpt

                        Legal_Records1.SetParameterValue("prog_user", textbox1.text)
                        crviewer.Refresh()

end sub

如果这可能是什么问题？我的 Crystal 报表中的其他数据显示了数据库中的正确值。

Answer 1

在添加值之前尝试清除它

With cryrpt
   .ParameterFields("prog_user").CurrentValues.Clear()
   .ParameterFields("prog_user").CurrentValues.Add(Textbox1.text)
End With