Syntax to pass parameter to crystal 8.5

[simma]

Hello
Can anyone please give me the syntax to pass the parameter from vb to crystal reports 8.
Thanks

 

[JCooL]

 For i = 1 To 2
    crEsCuentaA.ParameterFields(i).ClearCurrentValueAndRange
 Next i

    For i = 1 To crEsCuentaA.Database.Tables.Count
           crEsCuentaA.Database.Tables(i).SetLogOnInfo "Server", "Table", "ClientUser", "USER"
           crEsCuentaA.Database.Tables(i).SetLogOnInfo "Server", "Table", "ClientUser", "USER"
    Next i
    
          crEsCuentaA.DiscardSavedData
    
    For c = 1 To 2
          crEsCuentaA.ParameterFields(c).ClearCurrentValueAndRange
    Next c
          
      crEsCuentaA.ParameterFields(1).AddCurrentValue dtpFecha.Value
      crEsCuentaA.ParameterFields(2).AddCurrentValue dtCliente.BoundText
      
      Form1.ccr.ReportSource = crEsCuentaA
      Form1.ccr.ViewReport
      Form1.Show