02-17-2005 07:45 AM
02-17-2005 11:06 AM
02-17-2005 11:15 AM
02-17-2005 11:41 AM
Private Sub Command1_Click() Dim image As IPictureDisp Set image = CWGraph1.ControlImage Printer.PaintPicture image, 0, 0 Printer.EndDocEnd Sub