تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طباعة الدرجة باللون الاحمر اذا كانت اكثر من 50
#1
السلام عليكم اخوتي الكرام
لدي هذا البرنامج المصغر( المرفق ) وفية تقرير اكتيف ريبورت لطباعة نتائج الطلبة
ارغب في ان تكون درجة المجموع ( total ) والتي تظهر في التقرير باللون الاخضر اذا كانت تساوي 50 او اكبر وباللون الاحمر اذا كانت اصغر من 50
مع الشكر الجزيل لكم مقدما


الملفات المرفقة
.rar   vb example.rar (الحجم : 28.83 ك ب / التحميلات : 35)
الرد
تم الشكر بواسطة:
#2
وعليكم السلام السلام ورحمة الله وبركاته 

اضف الكود التالي  في الاكتيف  

كود :
Private Sub Detail_AfterPrint()

If Val(Me.Field5.Text) < 50 Then
Me.Field5.BackColor = &H8080FF
Else
Me.Field5.BackColor = &H80FF80
End If

End Sub
 والله الموفق
الرد
#3
أشكرك كثيرا استاذ
sendbad100
جعله الله في ميزان حسناتك
جاري التجربة
الرد
#4
للأسف لم يعمل الكود لدي  ولا اعرف هل الخطأ لدي في التصميم
حبَّذا مراجعة المثال استاذ sendbad100 وإضافة الكود وأكون شاكرا لحضرتك كثيرا
الرد
تم الشكر بواسطة:
#5
اولا تعديل اجراء الكود

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

كما  في الصوره

تفضل اخي الكريم     المثال في المرفقات


الملفات المرفقة صورة/صور
   

.rar   vb example11.rar (الحجم : 28.5 ك ب / التحميلات : 35)
الرد
#6
شكرًا جزيلا استاذ sendbad100 بارك الله بك أتعبتك
نسأل الله ان يجزيك خيرا
الرد
تم الشكر بواسطة: sendbad100
#7
العفوا
في الخدمة اخي

الله يكتب اجر الجميع

انشاء الله انه مضبوط
الرد
#8
(22-02-17, 05:23 PM)sendbad100 كتب : العفوا
في الخدمة اخي

 الله يكتب اجر الجميع

انشاء الله انه مضبوط
نعم مضبوط استاذي الكريم
ولكني غيرت backcolor الى forecolor
كي يظهر الرقم الملون وليس خلفية الرقم
شكرا جزيلا
الرد
تم الشكر بواسطة: sendbad100 , sendbad100


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] المساعدة في طباعة شريط وزن تخرج رسالة خطا وادي العوضي 6 127 12-02-19, 12:47 AM
آخر رد: وادي العوضي
  طباعة قيم مربعات نص غير مربوطة بقاعدة البيانات دهشوش1 4 192 30-11-18, 11:02 PM
آخر رد: دهشوش1
  احبابى فى الله ارجو المساعدة برنامج طباعة الباركود mhareek 2 279 19-09-18, 07:37 PM
آخر رد: mhareek
  [vb6.0] مساعده فى طباعة الباركود محمد فوزى محمد 1 229 14-09-18, 07:43 AM
آخر رد: Ahmed_Mansoor
  منع تشغيل اكثر من نسخة من البرنامج alfakeehy 4 541 31-07-18, 09:02 PM
آخر رد: المهندس ابوبكر
  طباعة مابداخل الفلكس قريد alfakeehy 5 394 24-02-18, 01:17 AM
آخر رد: مصمم هاوي
  أريد طباعة كارت شخصي للكل موظف بالاكتف ريبورت الحزين اوى 1 311 19-01-18, 04:13 PM
آخر رد: Amir_Alzubidy
  طلب كود للاضافة والتعديل على اكثر من جدول w123eg 0 170 10-01-18, 08:26 PM
آخر رد: w123eg
  طباعة مخصصة dr.mostashar 1 310 16-12-17, 12:18 AM
آخر رد: Ahmed_Mansoor
  طباعة بيانات محدد من خلال بحث في mshflexgrid دهشوش1 2 397 25-11-17, 02:29 AM
آخر رد: دهشوش1

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم