ازاى اطبع صورة موجودة على الفورم مع التقرير

أستعمل الكود التالي و أعطينا رأيك

With DataReport1.Sections("Section1")
	Set .Controls("Image1").Picture = Form1.Picture1.Picture
	End With
	DataReport1.Show

بحيث في هذا الكود تكون الصورة موجودة في الفورم 1 بإمكانك التغيير

شكرا شكرا شكرا هو ده المطلوب يا باشا

لي ملاحظة بسيطة لو كانت الصورة ثابتة يعني شعار الشركة أو شي من هذا القبيل يمكنك وضعها في التقرير مباشرة دون الكود ودون أي شي ثاني بإستخدامك أداة إمج في صفحة التقرير ومن ثم تحدد عليها وتختار الخاصية Picture وتحدد الصورة المطلوبة عرضها .. وبكذا ستطبع في جميع الفواتير دون عنا الأكواد .. تحياتي