Foros del Web - Ver Mensaje Individual - Asignar valor a objeto de texto desde vb6

lop7 · #6 (**permalink**) 29/09/2005, 06:23

pareciera que no estuviera reconociendo el parametro

intentalo asi...

Código:

 If  Report.ParameterFields.Count > 0 Then
        For i = 1 To Report.ParameterFields.Count
        Select Case LCase(Report.ParameterFields(i).ParameterFieldName)
                Case "@Compras"
                Report.ParameterFields(1).AddCurrentValue ("Hola")
         end select 
        next i

si tienes mas parametros los metes dentro del select case
saludos...
nos vemos...