如何將參數傳遞給Crystal報表？

Question

我正試圖通過在textbox中輸入客戶代碼來過濾使用Crystal中的參數的客戶。我爲客戶代碼創建了一個參數，並嘗試使用下面顯示的代碼傳遞它的值，但它不起作用。當我點擊按鈕則顯示所有的客戶不僅將過濾的：

Imports CrystalDecisions.CrystalReports.Engine 
Imports CrystalDecisions.Shared 

Public Class ParametroCrForm 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 

     Dim relatorio As New ReportDocument 

     relatorio.Load("C:\Users\Fernando e Flavia\Documents\Visual Studio 2010\Projects\Crystal.Estudo\Crystal.Estudo\CrystalReport1.rpt") 

     Dim crParameterFieldDefinitions As ParameterFieldDefinitions 
     Dim crParameterFieldDefinition As ParameterFieldDefinition 
     Dim crParameterValues As New ParameterValues 
     Dim crParameterDiscreteValue As New ParameterDiscreteValue 

     If codigoTextBox.Text = "" Then 
      MessageBox.Show("Digite um c�digo de cliente", "Aten��o", MessageBoxButtons.OK, MessageBoxIcon.Stop) 
      Exit Sub 
     End If 

     crParameterDiscreteValue.Value = codigoTextBox.Text 
     crParameterFieldDefinitions = relatorio.DataDefinition.ParameterFields 
     crParameterFieldDefinition = crParameterFieldDefinitions.Item("codigoParametro") 
     crParameterValues.Clear() 
     crParameterValues = crParameterFieldDefinition.CurrentValues 

     crParameterValues.Add(crParameterDiscreteValue) 
     crParameterFieldDefinition.ApplyCurrentValues(crParameterValues) 

     CrystalReportViewer1.ReportSource = relatorio 
     CrystalReportViewer1.Refresh() 

    End Sub 
End Class 

Answer 1

據ABZY解釋，我不得不添加選擇公式中我的報告。

在它下面的鏈接解釋如何做到這一點：

http://vb.net-informations.com/crystal-report/vb.net_crystal_report_parameter_string.htm

再次感謝Abzy！