Dim Parametros As New ParameterFields
Dim parametro As New ParameterField
Dim dVal As New ParameterDiscreteValue
parametro.ParameterFieldName = "NOMBRE_DEL_PARAMETRO"
dVal.Value = "VALOR_DEL_PARAMETRO"
parametro.CurrentValues.Add(dVal)
Parametros.Add(parametro)
CrystalReportViewer1.ParameterFieldInfo = Parametros