VB.NET中向报表传递参数时出错
我们提供的服务有：网站制作、做网站、微信公众号开发、网站优化、网站认证、安定ssl等。为近千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的安定网站制作公司
光看这一句的话，没发现问题，问题可能是出现在前面。
显示水晶报表的基本框架是这样的，如下：
'参数字段集合
Dim ParamFields As New ParameterFields
'参数字段
Dim ParamField As ParameterField
'离散值
Dim DiscreteVal As New ParameterDiscreteValue
''创建一个强类型报表实例
crReportDocument = New CrystalReport1
''将Dataset传递给报表
crReportDocument.SetDataSource(dataSet)
''将报表传递给浏览器
CrystalReportViewer1.ReportSource = crReportDocument
这个应该是你需要的，希望能帮到你，另外，如果你是刚刚接触水晶报表的话，关于水晶报表的问题你可以去 阿泰 CSND的BLOG 找找，不知道你有没有听说过，呵呵反正是很强大啦~
鍙傝 冭祫鏂欙细
伭悱吝栉媉升姁唪栿牿珛燀最娘檵
Command 函数
给程序传递参数后，参数会保存在command函数中，通过处理command接受的参数字符串来来编写相应代码就行了
例如快捷方式为“D:\Test.exe -s”
程序写：
msgbox（command）
得到的结果为：“-s”
VB.NET可选参数的默认值必须是一个常数表达式。
过程定义中跟在可选参数后的每个参数也都必须是可选的。
下面的语法显示带VB.NET可选参数的过程声明：
Sub sub name（ByVal parameter 1 As data type 1,
Optional ByVal parameter 2 As data type 2 = default value）
调用带VB.NET可选参数的过程
过程在运行时无法检测到给定的参数是否已被省略，或者调用代码是否已显式提供默认值。如果需要弄清楚这一点，可以设置一个不可能的值作为默认值。下面的过程定义了可选参数 office,并测试其默认值 QJZ 以查看它在调用中是否已被省略：
Visual Basic
Sub notify（ByVal company As String, Optional ByVal office As String = "QJZ"）
If office = "QJZ" Then
Debug.WriteLine（"office not supplied -- using Headquarters"）
office = "Headquarters" End If
' Insert code to notify headquarters or specified office.
End Sub
如果可选参数是像 String 这样的引用类型，只要它不是该变量所预期的值，就可以使用 Nothing 作为默认值。
VB.NET可选参数和重载
定义带可选参数的过程的另一种方法是使用重载。如果有一个可选参数，可以定义过程的两个重载版本，一个接受此参数，另一个则不带参数。此方法随可选参数数目的增加而变得更复杂。然而，这样做的优点是可以完全确定调用程序是否提供了每个VB.NET可选参数。
