طباعة صورة على الطابعة (Printer) كيف ؟؟؟؟؟؟؟؟؟؟؟؟؟

أخي هناك وصلة لطباعة ما في التكست للعضو Guest تحت عنوان كود طباعة أرجو أن تستفيد منها .

أخوك : سعد (f)

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

أخي العزيز اليك التالي

Printer.PaintPicture Picture1.Picture, 9150, 330

طباعة الصوره مه تحديد الموقع ، ولكن حجم الصوره ستطبع بحجمها الأصلي.

مع تحياتي

اقتباس

ولكن حجم الصوره ستطبع بحجمها الأصلي

ولطباعة الصورة حسب حجم الطابعة وليس حسب حجمها الأصلي (تحجيم الصورة), يجب تحديد عرض وارتفاع الصورة المطبوعة تبعا لطريقة قياس الطابعة

 Printer.ScaleMode = 7		'بالسينتيمتر
	 Printer.PaintPicture PIC2.Picture, 0, 0, 21, 29.7 'مقاس بالسمA4
  Printer.EndDoc