Stampare un immagine

[scancode]

Private Sub Command1_Click()
Dim myPict As Picture
Set myPict =
LoadPicture("C:\Immagine.bmp")
Printer.PaintPicture myPict, 10, 10
Printer.EndDoc
End Sub



ciao