تقييم الموضوع :
  • 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
وعليكم السلام

حط مثال صغير
ليتم التعديل عليه
  Heart   الرجاء البحث قبل وضع السؤال  Heart

   كل عام وانتم بالف بخير.  
الرد
تم الشكر بواسطة: haiderkh , عبد العزيز البسكري , Ahmed_Mansoor
#3
(24-02-17, 05:30 PM)sendbad100 كتب : وعليكم السلام

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


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

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


تفضل


الملفات المرفقة
.rar   vb example11.rar (الحجم : 24.42 ك ب / التحميلات : 67)
  Heart   الرجاء البحث قبل وضع السؤال  Heart

   كل عام وانتم بالف بخير.  
الرد
#5
(24-02-17, 08:02 PM)sendbad100 كتب : العفو

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية استخراج تقرير ملف PDF من برنامج مصمم بالفيجوال بيسك 6 mohamed arafa 4 116 11-09-18, 05:10 PM
آخر رد: mohamed arafa
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 2 113 11-09-18, 02:45 PM
آخر رد: عبدالقادرعواد
  [vb6.0] مشكلة فى الكريستال ريبورت 4.6 ahmed ragab 8 182 09-09-18, 01:36 PM
آخر رد: ahmed ragab
  [vb6.0] مشكلة اللغة العربية فى النسخ واللصق ahmad.roz 6 205 27-08-18, 01:58 AM
آخر رد: عبدالله الصافي
  [سؤال] داتا ريبورت ديناميكي fariddidou 0 53 26-08-18, 11:07 PM
آخر رد: fariddidou
  [سؤال] [تم الحل] مشكلة برنامج حساب نسب الموظفين awidan76 29 1,180 08-08-18, 08:51 PM
آخر رد: awidan76
  مشكله ادماج كريستال ريبورت 10 مع فيجوال بيسك 6 amro1965 5 206 01-07-18, 10:51 PM
آخر رد: elgokr
  [سؤال] مشكلة في تسجيل الاداة محمد جبريل 1 109 27-06-18, 09:36 PM
آخر رد: Amir_Alzubidy
Question [vb6.0] هل يوجد حل لهذه الرساله التي تظهر معي عند انشاء تقرير ؟؟ Microformt 2 153 06-06-18, 10:42 PM
آخر رد: Microformt
  [vb6.0] مشكلة الرقم عشرة princeofislam 2 148 19-05-18, 11:23 PM
آخر رد: princeofislam

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


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