VB报表及预览功能,对图表数据进行打印,这个图表的数据默认是写在代码中,实际使用时,往往是从数据库读取出来数据,然后生成。因此本程序只是演示直方图图表的生成及预览和打印功能,生成图表,请参考以下核心代码:  PrivateSubCommand1_Click()  MSChart1.EditCopy  Picture1.Picture=Clipboard.GetData(vbCFDIB)  EndSub  PrivateSubCommand2_Click()  MSChart1.EditCopy  Picture1.Picture=Clipboard.GetData(vbCFDIB)  Printer.Pa