VB Exported Crystal Reports Chart Missing in PDF

Problem getting Crystal Reports chart to show in PDF when exported via VB code (below). I use Crystal Reports 9 (Dev), existing report will export fine if using the export function within CR 9. Other reports I have export via the VB code without problem, but the one with a chart has trouble. I am also using VB 6.0. Any help appreciated - Thanks.

Reference:
CR 9 ActiveX Designer Design and Runtime Library
CR 9 ActiveX Designer Runtime Library
VB Code:
Public CrystalApp As CRAXDRT.Application
Public CrystalReport As CRAXDRT.Report
Public CrystalSubreport As CRAXDRT.Report
Public CrystalTable As CRAXDRT.DatabaseTable
Public CrystalParameter As CRAXDRT.ParameterFieldDefinition
Public CrystalFormula As CRAXDRT.FormulaFieldDefinition
Public CrystalExportOptions As CRAXDRT.ExportOptions
 
Set CrystalApp = CreateObject("CrystalRunTime.Application")
Set CrystalReport = CrystalApp.OpenReport("Path_of_X.rpt")
 
CrystalReport.DiscardSavedData
CrystalReport.PaperOrientation = crDefaultPaperOrientation
 
Set CrystalExportOptions = CrystalReport.ExportOptions
CrystalExportOptions.PDFExportAllPages
CrystalExportOptions.FormatType = crEFTPortableDocFormat
CrystalExportOptions.DiskFileName = "Path_of_X.pdf"
CrystalExportOptions.DestinationType = crEDTDiskFile
CrystalReport.Export False