Dim crParameterFieldDefinitions As CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinitions Dim crParameterFieldDefinition As CrystalDecisions.CrystalReports.Engine.ParameterFieldDefinition Dim crParameterValues As New CrystalDecisions.Shared.ParameterValues Dim crParameterDiscreteValue As New CrystalDecisions.Shared.ParameterDiscreteValue crParameterDiscreteValue.Value = Value crParameterFieldDefinitions = objReport.DataDefinition.ParameterFields crParameterFieldDefinition = crParameterFieldDefinitions.Item("BottomN") crParameterValues = crParameterFieldDefinition.CurrentValues crParameterValues.Clear() crParameterValues.Add(crParameterDiscreteValue) crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)