Olá !
adicione no projeto
- componente
crystal report viewer control 9 (CRViewer1-componente que deve ser adicionado em um form para visualizar relatório)
- referencia
crystal reports 9 activex designer run time library
crystal reports 9 library
crystal reports 9 activex designer design and run time library
-programa
Public rpt As New CRAXDRT.Report
Public crApplication As New CRAXDRT.Application
Set rpt = crApplication.OpenReport(arquivo_rpt, crOpenReportByTempCopy)
'para carregar query caso queira passar por fora
rpt.SQLQueryString=vquery
' para carregar formula
rpt.FormulaFields.GetItemByName(