Estou querendo sair do crystal 8.5 e da dll crystl32.ocx , e adquiri o crystal 11, gostaria de um exemplo de como usar o crviewer ?

1º voce precisa criar um form com o objeto CRViewer9

2º No form que irá chamar o relatório passe os parametros conforme exemplo:

    Formulario = "Relatório de Vendas" ' Variável Publica
    Relatorio = "RelVen.rpt"  ' Variável Publica
    ORIENTA = 1  ' Variável Publica
    Form3.Show
3º  no Form3 (aquele em que vc criou com o crviewer9) faça a seguinte prg.

 

Dim Appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report

Private Sub CRViewer91_PrintButtonClicked(UseDefault As Boolean)
    Report.PrinterSetup (hwnd) ' chama a tela de opção de impressora
End Sub

Private Sub Form_Load()
    Dim RELAT As String
    Form3.Caption = Formulario
    RELAT = App.Path & "" & Relatorio
    Set Report = Appl.OpenReport(RELAT)
    Report.PaperOrientation = ORIENTA
    Screen.MousePointer = vbHourglass
    CRViewer91.ReportSource = Report
    CRViewer91.ViewReport
    Screen.MousePointer = vbDefault
End Sub

Private Sub Form_Resize()
    CRViewer91.Top = 0
    CRViewer91.Left = 0
    CRViewer91.Height = ScaleHeight
    CRViewer91.Width = ScaleWidth
End Sub

MAS E PARA PASSAR FORMULAS, SELECTIONFORMULA, ETC, MUDA ALGO ??

??

EU normalmente monto meus relatórios já com todas as formulas prontas dentro dele, só modifico as tabelas temporárias a qual o formulário está atrelado