تقييم الموضوع :
  • 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 ك ب / التحميلات : 38)
الرد }}}
#6
شكرًا جزيلا استاذ sendbad100 بارك الله بك أتعبتك
نسأل الله ان يجزيك خيرا
الرد }}}
تم الشكر بواسطة: sendbad100
#7
العفوا
في الخدمة اخي

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

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

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [vb6.0] معلومة هامه في ActiveReport هل تريد طباعة على وجهين انظر الى الصوره المرفقه Microformt 0 107 07-01-24, 11:32 PM
آخر رد: Microformt
  كيف يمكن تشغيل برنامجي على اكثر من جهاز بنفس الوقت princeofislam 1 291 14-10-23, 08:18 PM
آخر رد: princeofislam
Question [vb6.0] اكثر من سؤال حول كريستال ريبورت ؟؟ Microformt 0 477 20-05-23, 09:54 PM
آخر رد: Microformt
  [سؤال] كيفية عمل group على اكثر من متغير ف تقرير active report 2 aboezzat84 1 847 12-02-22, 11:00 PM
آخر رد: Taha Okla
  [vb6.0] اختيار اسم الزبون من الكومبو بوكس لغرض طباعة تقريره وادي العوضي 4 1,295 15-01-22, 06:13 PM
آخر رد: وادي العوضي
  [vb6.0] كيفيه ربط اكثر من برنامج معاا فى صفجة واجدة exe MEDHAT_R_S 0 950 12-04-21, 12:09 PM
آخر رد: MEDHAT_R_S
  طباعة بيانات الطلبة في الفليكس قريد مصمم هاوي 1 1,117 11-04-21, 01:58 AM
آخر رد: مصمم هاوي
  [سؤال] مشكلة طباعة في Activereport basset87 6 2,076 17-02-21, 11:04 PM
آخر رد: Ahmed_Mansoor
  منع تشغيل اكثر من نسخة من البرنامج alfakeehy 7 4,674 22-10-20, 04:51 PM
آخر رد: Microformt
  اخى الغالى الاستاذ امير سول فى الاستعلام من اكثر من جدول mhareek 2 1,141 03-10-20, 09:05 PM
آخر رد: mhareek

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


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