Visual Basic - Parametro para informe

Tengo un report en crystal pero kiero automatizar el cuento pasandole la sql desde el programa ke hice.. el codigo es el sig

Function InfoParametros(xCodReport, xParametros)
MDIMenu.CrystalReport1.Formulas(0) = "FechaIni= """ & Format(frmFechas.MEBFechaIni, "dd-mm-yyyy") & """"
MDIMenu.CrystalReport1.Formulas(1) = "FechaFin= """ & Format(frmFechas.MEBFechaFin, "dd-mm-yyyy") & """"
MDIMenu.CrystalReport1.WindowTitle = xDescripcion
MDIMenu.CrystalReport1.ReportFileName = LeePath("Report") & CodReport & ".rpt"

en esta parte me arroja error en la formula....

MDIMenu.CrystalReport1.SelectionFormula = xParametros
MDIMenu.CrystalReport1.Action = 1

end function

como puedo arreglarlo?????????