Picture1.Picture = Picture1.Image
Printer.PaintPicture Me.Picture1.Picture, 500, 600, Me.Picture1.Width * 10, Me.Picture1.Height * 10
Printer.EndDoc
Printer.PaintPicture Me.Picture1.Picture, 500, 600, Me.Picture1.Width * 10, Me.Picture1.Height * 10
Printer.EndDoc
图形不好处理。