[دهشوش1]

(30-11-18, 09:30 PM)عبدالله الصافي كتب : إستخدم ذلك الكود

كود :

Set DataReport1.Sections("section4").Controls("Label1").Caption = Text1.Text

حيث Label1   هو اداة العنوان في التقرير في القس 4
و Text1  خانة النص المراد طباعة قيمتها

اشكرا اخي عبد الله على سرعة ردك وجزاك الله خير

حاولت ولكن يبدو اني لم افهم استخدام الكود بشكل صحيح

اتمنى اخي المساعدة بالتعديل على المشروع باضافة datareport2
وتطبيق الكود على احد مربعات النص مثلا text30 ويمثل قيمة TSH

وان شاء الله اطبقة على الباقي ولك شكري