Visual Basic - Relacionar con Crystal Report

Tengo el visual basic 5.0 que viene con una version del crystal report (4.6). Tengo un formulario con el que quiero sacar un listado entre varios clientes tras pulsar un boton. El problema es que no me ejecuta la consulta que le hago o no acierto con la sintaxis de la instrucción. El código que pongo es:
CrystalReport1.SQLQuery = ("select * from clientes where cod_cliente>='" & cb_desde.Text & "' and cod_cliente<='" & cb_hasta.Text & "'")
CrystalReport1.PrintReport
Tambien probé con la propiedad crystalreport1.selectionformula pero tampoco me funcionó.
Agradezco todo tipo de sugerencia. Gracias.

...mmm yo he usado mejor el selectionformula y me funciona, mi duda es, el campo cod_cliente es numerico o tipo texto porque si es texto no puedes decirle que sea mayor, pero si el campo es numerico entonces pon: "select * from clientes where cod_cliente >= " & val(cb_desde.Text) & " and cod_cliente <= " & val(cb_hasta.Text) & "" ..checha que cuando es numerico no lleva ( ' ) ...a lo mejor eso es lo que esta mal, Suerte.

Gracias, ahora voy a probar. Si no, tendré que cambiar el tipo de dato a numerico....

¿Y porqué no creais una consulta con código que se llame, por ejemplo "seleCAJA" y enlazáis el Report a esa consulta sin más fórmulas y así mostrará todo lo que haya. Mostrará siempre el resultado de la última consulta. ¡Mira que fácil!

Set ws = DBEngine.Workspaces(0)
Set base = ws.OpenDatabase(DataRuta, False, False, ";PWD=ROSARIO")

On Error Resume Next
base.QueryDefs.Delete "seleCAJA"
Err = 0

If Option1(0).Value = True Then
SQL = "SELECT * FROM CAJA WHERE Fecha = Date();"
Else
If txtDesde = "" Or txtHasta = "" Then
MsgBox "Debe rellenar los campos de selección entre fechas"
txtDesde.SetFocus
GoTo fuera
End If

If IsDate(txtDesde) And IsDate(txtHasta) Then
Dim criterio1, criterio2
criterio1 = Format(txtDesde, "Short Date")
criterio2 = Format(txtHasta, "Short Date")
If CInt(Left(criterio1, 2)) < 13 Or CInt(Left(criterio2, 2)) < 13 Then
criterio1 = formateaFecha(criterio1)
criterio2 = formateaFecha(criterio2)
End If
SQL = "SELECT * FROM CAJA WHERE Fecha BETWEEN #" & criterio1 & "# AND #" & criterio2 & "# ORDER BY Fecha;"
Else
MsgBox "No son fechas válidas"
cmdAcepSele.Visible = False
txtDesde = ""
txtHasta = ""
txtDesde.SetFocus
GoTo fuera
End If
End If

Set nuevosql = base.CreateQueryDef("seleCAJA", SQL)
DataConCaja.RecordSource = "seleCAJA"
DataConCaja.Refresh
columnasGrid
cmdImprimir.Visible = True
cmdImprim.Visible = True
fuera:
base.Close