有,給你看一段CrystalReport參數 傳遞的例子:
Dim reportdoc As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim paradisvalue As New CrystalDecisions.Shared.ParameterDiscreteValue
Dim myconn As New CrystalDecisions.Shared.ConnectionInfo
Dim mylogon As New CrystalDecisions.Shared.TableLogOnInfo
Dim FLAG As String