你看下这个问题 http://space.cnblogs.com/question/16601/
只要数据连接的代码由你自己来编写后,你就可以通过弹出一个输入框来获取数据库连接的相关属性。
试一下下面这一串代码,如果不行的话可以用finereport来做
参数字段集合
Dim ParamFields As New ParameterFields
'参数字段
Dim ParamField As ParameterField
'离散值
Dim DiscreteVal As New ParameterDiscreteValue
paraField.ParameterFieldName = "ParameterField1";
discreteVal.Value = "这是一个测试";
paraField.CurrentValues.Add(discreteVal);
paraFields.Add(paraField);
crystalReportViewer1.ParameterFieldInfo = paraFields;
crystalReportViewer1.Refresh();
crystalReportViewer1.RefreshReport();