السلام عليكم اخوتي الكرام
لدي هذا البرنامج المصغر( المرفق ) وفية تقرير اكتيف ريبورت لطباعة نتائج الطلبة
ارغب في ان تكون درجة المجموع ( total ) والتي تظهر في التقرير باللون الاخضر اذا كانت تساوي 50 او اكبر وباللون الاحمر اذا كانت اصغر من 50
مع الشكر الجزيل لكم مقدما
وعليكم السلام السلام ورحمة الله وبركاته
اضف الكود التالي في الاكتيف
كود :
Private Sub Detail_AfterPrint()
If Val(Me.Field5.Text) < 50 Then
Me.Field5.BackColor = &H8080FF
Else
Me.Field5.BackColor = &H80FF80
End If
End Sub
والله الموفق
أشكرك كثيرا استاذ
sendbad100
جعله الله في ميزان حسناتك
جاري التجربة
للأسف لم يعمل الكود لدي ولا اعرف هل الخطأ لدي في التصميم
حبَّذا مراجعة المثال استاذ sendbad100 وإضافة الكود وأكون شاكرا لحضرتك كثيرا
اولا تعديل اجراء الكود
PHP كود :
Private Sub Detail_BeforePrint()
If Val(Me.Field5.Text) < 50 Then
Me.Field5.BackColor = &H8080FF
Else
Me.Field5.BackColor = &H80FF80
End If
End Sub
ثم غير الخاصية BackStyle لل Field5 الى 1- DDBKNORMAL
كما في الصوره
تفضل اخي الكريم المثال في المرفقات
شكرًا جزيلا استاذ sendbad100 بارك الله بك أتعبتك
نسأل الله ان يجزيك خيرا
العفوا
في الخدمة اخي
الله يكتب اجر الجميع
انشاء الله انه مضبوط
(22-02-17, 05:23 PM)sendbad100 كتب : [ -> ]العفوا
في الخدمة اخي
الله يكتب اجر الجميع
انشاء الله انه مضبوط
نعم مضبوط استاذي الكريم
ولكني غيرت backcolor الى forecolor
كي يظهر الرقم الملون وليس خلفية الرقم
شكرا جزيلا