Visual BAsic y Crystal REport

[ozelu]

Ya solucione el problema, es que no entendia lo que me decias de no poner las formulas, claro quite las formulas del codigo y puse solo esto:

reporte.ReportFileName = "c:\historial.rpt"
reporte.DiscardSavedData = True
reporte.Formulas(0) = "Cliente='" & Text25.Text & "'"
reporte.Formulas(1) = "Marca='" & Text26.Text & "'"
reporte.Formulas(2) = "Modelo='" & Text26.Text & "'"
While Not rs.EOF
If id = rs!id_vehículo Then
reporte.SelectionFormula = "{reparaciones.id_vehículo}=" & id
rs.MoveNext
Else
rs.MoveNext
End If
Wend
reporte.DiscardSavedData = True
reporte.Action = 1
reporte.ReportFileName = ""

y meti los campos en el reporte. Muchisimas gracias de verdad, te debo la vida, no puedes imaginarte lo muchisimo que me has ayudado, gracias de verdad muchas gracias.