Visual Basic - Pasar sentencia SQL al crystal report

Desarrollo en vb6.0 y cr 9.0 Hola tengo 02 formularios frmaplicación y frmreporte como hago la conección a mi bas de datos en acces y envío la siguiente sentencia sql al crystal
SQL="select * from tabla1"
donde hago la programación en frmaplicacion o frmreporte
ayudame por favor es urgente. si pueden enviarme un ejemplo mi email es [email protected]

Gracias

Hola.
Yo utilizo el siguiente codigo, decir que utilizo crystal 8 y el .ocx.
Menu.Crystal1.ReportFileName = "c:prueba.rpt"
Menu.Crystal1.SelectionFormula = "{Facturas.serie}='" & StrConv(Text1.Text, vbUpperCase) & "' and {Facturas.numero}=" & Val(VaEn) & " and {Facturas.Empresa}=" & Empresa
Menu.Crystal1.Formulas(0) = "Color= '1'"
Menu.Crystal1.WindowState = crptMaximized
Menu.Crystal1.WindowShowExportBtn = True
Menu.Crystal1.WindowShowProgressCtls = True
Menu.Crystal1.WindowShowPrintSetupBtn = True
Menu.Crystal1.WindowShowGroupTree = True
Menu.Crystal1.WindowShowSearchBtn = True
Menu.Crystal1.WindowShowZoomCtl = True
Menu.Crystal1.WindowParentHandle = Menu.hwnd 'hace midi
Menu.Crystal1.Destination = crptToWindow ' = crptToPrinter
r = Menu.Crystal1.PrintReport 'visualiza
Dim Error1
If r <> 0 Then
Error1 = MsgBox("El error es : " & r, vbCritical)
Else
End If

Espero que te sirva.
Un saludo

Hola amiguito, muchas gracias al parecer tu haces tus reportes en el mismo crystal report, por eso lo llamas c:prueba.rpt, sin embargo yo hago mis reportes con crystal report, en la misma opcion del visual basic 6.0 por lo tanto no llamo al reporte. Por favor si podris mandarme un ejemplo con lo que te digo a mi correo ,,, por favor ayudame es urgente.