Print out PictureBox on printer

[Matt-D]

In my program, there is a picture box.
Into this picture-Box I copied a picture which I made in
MS-Paint.
How do I print it out on the printer ?, because
there's no picture property.

Thanks for some help, Matt

[Chris]

For Each MyPrinter In Printers
If MyPrinter.DeviceName = <Printer Name that you used for the printing job> Then
Set Printer = MyPrinter
Exit For
End If
Next

Printer.Orientation = vbPRORLandscape
Printer.PaperSize = vbPRPSA4
Printer.PrintQuality = vbPRPQHigh
Printer.Print " "
Printer.PaintPicture Picture1.Picture, 0, 0, Picture1.Width, Picture1.Height
Printer.EndDoc

Well, hope it help you.

Edited by Chris on 03-11-2000 at 03:43 PM