miren espero k alguien me pueda ayudar me urge
tengo el siguiente codigo:
Dim CR As New ReportDocument
CR.Load("C:\ConsEstudios.rpt")
Dim crParameterDiscreteValue As ParameterDiscreteValue
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldLocation As ParameterFieldDefinition
Dim crParameterValues As ParameterValues

Try
crParameterFieldDefinitions = CR.DataDefinition.ParameterFields

crParameterFieldLocation = crParameterFieldDefinitions.Item("boleta")
crParameterValues = crParameterFieldLocation.CurrentValues
crParameterDiscreteValue = New CrystalDecisions.Shared.ParameterDiscreteValue
crParameterDiscreteValue.Value = txtBoleta.Text
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldLocation.ApplyCurrentValues(crPara meterValues)

CrystalReportViewer1.ReportSource = CR
Catch ex As Exception
MsgBox(ex.Message)
End Try

pero cuando lo corro me marca el error de: error de el indice no es valido (excepxion de HRESULT: 0x8002000B (DISP_EBADINDEX))

Alguien puede ayudarme por favor
Mil gracias

__________________
***********