Crystal Report - Crystal report 8

Hola tenia instalado el crystal 7.0 y cuando queria hacer una vista previa con estas instrucciones me funcionaba bien:

Dim x As Integer
frm_principal.reporte.DataFiles(0) = App.Path + "\agenda97.mdb"
frm_principal.reporte.ReportFileName = App.Path + "\reporte\agenda.rpt"
frm_principal.reporte.DiscardSavedData = True
frm_principal.reporte.WindowShowNavigationCtls = False
frm_principal.reporte.SelectionFormula = "{agenda.cod} = " + Trim(xcod)
frm_principal.reporte.WindowState = crptMaximized
frm_principal.reporte.Destination = crptToWindow
x = frm_principal.reporte.PrintReport
If x <> 0 Then
MsgBox frm_principal.reporte.LastErrorString, vbCritical, "Mensaje"
End If

ahora instale el crystal 8.0 y me da error con los parametros, que tengo que modificar para que me funcione bien.
gracias