Saludos, recurro al foro, por que eh agotado las opciones para poder abrir un reporte en crystal reports 10, eh visto post anteriores y hay un ejemplo en la version 9, trate de adaptarlo a la 10, pero es muy distinto.
Alguien podria ayudar, solo en como sustituir estas dos lineas:

Private crApp As New CRAXDRT.Application
Private crReport As New CRAXDRT.Report







De antemano gracias.

Hola, yo me encontraba en el mismo caso
Experimente y junte todo lo que pude e hice una mezcla, espero te sirva.

En el Frm donde llamas al informe, coloque mis atributos como siguesClaro en un evento clic del cmd)
V_Reporte = "Z:\Reportes\Manifiestos.rpt"
V_SQL = "SELECT `RutasEnvios`.`NoOrden`, `RutasEnvios`.`IdCliente`, `RutasEnvios`.`Pagada`, `RutasEnvios`.`TipoDePago`, `RutasEnvios`.`Monto`, `RutasEnvios`.`Ruta` FROM `RutasEnvios` `RutasEnvios` where `RutasEnvios`.`Ruta` = " & FrmMensajeria.LblRuta.Caption

claro tienes que definir esas dos variables en un modulo, (asi lo hice yo)
Public V_Reporte As String
Public V_SQL As String

y en el frm, donde esta mi visualizador de Crystal, coloque lo sigueinte.

Screen.MousePointer = vbHourglass
mflgContinuar = True
Set crReport = crApp.OpenReport(V_Reporte, 1)
crReport.SQLQueryString = V_SQL
Screen.MousePointer = vbDefault


y chinnn, que se despliega.
Espero te sirva... mientras yo seguire buscando como mandar el contenido de un Text a mi informe...... Sabras como?
Saludos.. ||e.c@no||

Se me olvidaba incluir unas lineas despues.

crViewer.ReportSource = crReport
crViewer.DisplayGroupTree = False
crViewer.DisplayTabs = False
crViewer.ViewReport

y con esas lineas tu programa se desplegara en pantalla
Saludos y mil disculpas