Puoi scrivere
Printer.PaintPicture Image1.Picture, 0, 0, Printer.ScaleWidth, Printer.ScaleHeight
Printer.EndDoc
adattandola a quello che ti serve.
In ogni caso, ti suggerisco di dare un'occhiata all'help dei vari metodi (PaintPicture in particolare) e degli oggetti (Printer, Image) per imparare a trattare tali oggetti per la stampa.