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


كود :
Private Sub Detail_BeforePrint()
If Val(Me.Field4.Text) < 50 Then
Me.Field4.BackColor = &HFF&

Else
Me.Field4.ForeColor = &HC000&
End If
If Val(Me.Field7.Text) < 50 Then
Me.Field7.BackColor = &HFF&
Else
Me.Field7.ForeColor = &HC000&

End If
If Val(Me.Field10.Text) < 50 Then
Me.Field10.BackColor = &HFF&

Else
Me.Field10.ForeColor = &HC000&

End If
فاين الخطأ اخوتي الكرام علما اني مبيتدئ في برمجة فيجوال بيسك

الصورة الثانية هي الصحيحة والاولى تظهر غير صحيحة من حيث الخلفية واللون


الملفات المرفقة صورة/صور
       
الرد
تم الشكر بواسطة:
#2
وعليكم السلام

حط مثال صغير
ليتم التعديل عليه
السلام عليكم  احبائي 
بسبب انشغالي  قل  عطائي  -- اعتذر منكم  --  وسال الله العلي القدير  ان لا يشغلنا الا بطاعته.
اشكر كل الاخوة في المنتدى الرائع الذين ساعدوني خاصة والذين يساعدون الجميع -- اسال الله العلي القدير ان يكتب اجرهم مضاعفا ويرزقهم الجنة.
الرد
تم الشكر بواسطة: haiderkh , عبد العزيز البسكري , Ahmed_Mansoor
#3
(24-02-17, 05:30 PM)sendbad100 كتب : وعليكم السلام

حط مثال    صغير
ليتم التعديل عليه
الاخ الاستاذ sendbad100 شكرا لسرعة ردك
اخي الكريم هذا هو المثال


الملفات المرفقة
.rar   vb example.rar (الحجم : 109.95 ك ب / التحميلات : 38)
الرد
تم الشكر بواسطة: Ahmed_Mansoor
#4
العفو

اتمنى انه المطلوب 


تفضل


الملفات المرفقة
.rar   vb example11.rar (الحجم : 24.42 ك ب / التحميلات : 56)
السلام عليكم  احبائي 
بسبب انشغالي  قل  عطائي  -- اعتذر منكم  --  وسال الله العلي القدير  ان لا يشغلنا الا بطاعته.
اشكر كل الاخوة في المنتدى الرائع الذين ساعدوني خاصة والذين يساعدون الجميع -- اسال الله العلي القدير ان يكتب اجرهم مضاعفا ويرزقهم الجنة.
الرد
#5
(24-02-17, 08:02 PM)sendbad100 كتب : العفو

اتمنى انه المطلوب 


تفضل
شكرا جزيلا استاذ sendbad100
بارك الله فيك وجعلة في ميزان حسناتك
الرد
تم الشكر بواسطة: Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  من لديه مثال عن طباعه الصفوف المختاره من الفلكس جريد الي الاكتيف ريبورت scsi7000 4 86 13-04-18, 10:14 PM
آخر رد: mhareek
Question [سؤال] مشكلة في استدعاء مكتبة DLL Omar Abd 1 62 13-04-18, 09:27 AM
آخر رد: Ahmed_Mansoor
  السلام عليكم مشكلة في زر ( عضو جديد) hananfathy 7 158 08-04-18, 03:47 PM
آخر رد: hananfathy
  تلوين اسطر في تقرير داتا ريبورت gonm64 5 100 26-01-18, 12:20 PM
آخر رد: awidan76
  [سؤال] الاكتيف ريبورت Abdellah 2 75 22-01-18, 12:44 AM
آخر رد: Abdellah
  أريد طباعة كارت شخصي للكل موظف بالاكتف ريبورت الحزين اوى 1 78 19-01-18, 04:13 PM
آخر رد: Amir_alzubidy
  [ تمّ الحل ] : إضافة الملفات أثناء تصطيب البرامج التّنفيذيّة عبد العزيز البسكري 13 785 18-01-18, 10:22 PM
آخر رد: الوايلي
  مشكلة في تحويل التاريخ dr.mostashar 2 55 18-01-18, 12:28 AM
آخر رد: dr.mostashar
  مشكلة في Active Report dr.mostashar 4 92 18-01-18, 12:09 AM
آخر رد: dr.mostashar
  السلام عليكم عندي مشكلة عند ربط قاعدة بيانات اكسس بالفيجول بيسك 6 عزف الرياح 2 152 25-12-17, 12:38 AM
آخر رد: عزف الرياح

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


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