29-11-13, 01:43 AM
السلام عليكم
اطلب تعديل هذا الكود لطباعة عنصر معين فقط في الفورم و هو picture2
اطلب تعديل هذا الكود لطباعة عنصر معين فقط في الفورم و هو picture2
كود :
Set Picture1.Picture = CaptureClient(Me(
CommonDialog1.CancelError = True
On Error GoTo Exitsub
CommonDialog1.ShowPrinter
Call PrintPictureToFitPage(Printer, Picture1.Picture)
Printer.EndDoc
Exit Sub
Exitsub:
Exit Sub