SoloCodigo

Saben muy pocas veces pido ayuda si no es que es la primera...no deseo molestar a nadie pero esto ya me sobrepaso ... tengo un problemon con un filtro deregistro en Crystal Reports 10 en SearchByFormula ya que intento filtrar desde Visual Basic 6.0 y me arroja un error  La ejecucion se detiene en SearchByFormula y me arroja el error '-2147418113(8000ffff)'en tiempo de ejecucion:
Error en el metodo 'SearchByFormula' del objeto 'ICrystalReportviewer 10'.. mi codigo es el siguiente :


Dim SelectFormula, dato As String
SelectFormula = "{contratocerrado.Numerocontrato}=" & Text1(0).Text
ReportName = "Report1.rpt"
Set CrRep = CrApp.OpenReport(App.Path & "\" & ReportName)
With CrystalReport1
         .ReportSource = CrRep
         .EnableExportButton = True
         .DisplayGroupTree = False
         .EnablePopupMenu = False
         .EnableDrillDown = False
         .EnableSelectExpertButton = False
         .SearchByFormula (SelectFormula)
         .ViewReport
          .Zoom 100
End With
Frame5.Visible = True


Si alguien me puede ayudar se lo agradeceria