How to Display the MS Chart to data Report!
' This code will make the MS chart converted to an image and load it to the data report..
MSChart1.EditCopy
Picture1.Picture = Clipboard.GetData(vbCFMetafile)
SavePicture Picture1.Picture, App.Path & "\Image1.wmf"
Set animal.DataSource = recordset
Set animal.Sections("section2").Controls.Item("Image1").Picture = LoadPicture((App.Path & "\Image1.wmf"))
animal.Show