[ALBRNS]

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

تفضل

PHP كود :

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


بالتوفيق