[ALBRNS]

وعليكم السلام ورحمة الله وبركاته

اخي انت قلت ان الصورة على سطح الفورم ولم تقل انها باداة Image

عموما استخدم الكود التالي

PHP كود :

Private Sub Command1_Click()
Printer.PaintPicture Image1.Picture, 0, 0, _
Image1.Picture.Width, Image1.Picture.Height
Printer.EndDoc
End Sub 


بالتوفيق