2saad

بالنسبة للتقييم Public Function funTotalTgym2(degr As Integer) As String If degr >= 510 Then funTotalTgym2 = "يفوق التوقعات" ElseIf degr >= 390 Then funTotalTgym2 = "يلبي التوقعات" ElseIf degr >= 300 Then funTotalTgym2 = "يلبي التوقعات أحيانا" ElseIf degr >= 1 Then funTotalTgym2 = "أقل من المتوقع" ElseIf degr = 0 Then funTotalTgym2 = "غ" End If End Function

السلام عليكم أخي الفاضل أنا آسف لم أرد علي حضرتك لان كان عندي العيلة كلها حضرتك انت عارف أيام عيد كل سنة وأنت طيب ولم افتح الجهاز بالنسبة للصفوف العليا حالة التلميذ : أولا : مجموع درجات المواد الأساسية : ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا ) = 600 مواد الرسوب المهمة عندي ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا + دين + مهارات ) *ثانيا : نضع في الاستعلام حقلين واحد لمواد الرسوب والآخر لعدد مواد الرسوب بحيث شرط النجاح كالآتي : 1 - اذا كان مجموع المواد الأساسية للطالب =0 تكون حالة الطالب ( غ ) 2 - اذا كان مجموع المواد الأساسية للطالب <=300 و عدد مواد الرسوب ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا + دين + مهارات ) =" " ونوع الطالب ( ذكر ) تكون حالة الطالب ( ناجح ) 4- اذا كان مجموع المواد الأساسية للطالب <= 300 و عدد مواد الرسوب ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا + دين + مهارات ) =" " ونوع الطالب ( انثي) تكون حالة الطالب ( ناجحة ) 5- اذا كان مجموع المواد الأساسية للطالب > 300 أو عدد مواد الرسوب ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا + دين + مهارات ) <>" " ونوع الطالب ( ذكر ) تكون حالة الطالب ( له برنامج علاجي) 5- اذا كان مجموع المواد الأساسية للطالب > 300 أو عدد مواد الرسوب ( عريي + رياضيات + انحليزي + علوم + دراسات + تكنولوجيا + دين + مهارات ) <>" " ونوع الطالب ( انثي) تكون حالة الطالب ( لها برنامج علاجي) '-----------------خاص بالصفوف العليا-------------------- Public Function funResultNesf_Up(tot As Integer, cnt As String, ty As Integer) As String If tot = 0 Then funResultNesf_Up = "(غ)" ElseIf tot >= 300 And cnt = "" And ty = 1 Then funResultNesf_Up = "ناجح" ElseIf tot >= 300 And cnt = "" And ty = 2 Then funResultNesf_Up = "ناجحة" ElseIf tot < 300 Or cnt <> "" And ty = 1 Then funResultNesf_Up = "له برنامج علاجي" ElseIf tot < 300 Or cnt <> "" And ty = 2 Then funResultNesf_Up = "لها برنامج علاجي" Else funResultNesf_Up = "" End If End Function

السلام عليكم أخي الفاضل الله يبارك في عمرك وصحتك وزادك الله من علمه وجعله في ميزان حسناتك سوف أجرب وأوافيك

السلام عليكم أخي الفاضل لحد الآن كله شغال تمام

شكرا جزيلا أخي الفاضل وكل عام وأنت طيب سوف أجرب وأوافيك بالنتيجة

تمام اخي الفاضل

تمام اخي الفاضل وهذا يسهل علينا توحيد الدوال والوحدات النمطية

ممكن نعتمد علي ونوحدها شكرا جزيلا أخي الفاضل

تمام نبقي علي ( لم يتقن المعارف )

آسف بالنسبة ( لم يتقن المعارف ) دي المتعارف عليه من قبل الوزارة عندنا كتقييم لمن لا حصل علي 50 في جميع المواد ماعدا الأنشطة بس أحنا ممكن نغامر وننفذها

ممكن ننفذها الفكرة دي مع أنها مغامرة لأن المتعارف عليه عندنا ( مادة الرسوب ) فيالفصل الدراسي الأول اسمها ( له برنامج علاجي - لها برنامج علاجي ) وفي الفصل الدراسي الثاني ( له درو ثان - لها دور ثان ) يعني تكتب في النتيجة الدرجات مضبوطة في المرفق الآتي Database11.accdb

أحنا ممكن نجعل ( اجتاز ) يقابله اللون الأزرق ونعدل الشرط في اللون < = 10 أم بالنسبة ( لم يجتز ) يقابله اللون الأحمر بحيث نغير في الشرط اللون الأحمر نجعله ( > 10 ) كذلك أخي الفاضل القيم والأخلاق نجعل ( اجتاز ) يقابله اللون الأزرق ونعدل الشرط في اللون < = 50 أم بالنسبة ( لم يجتز ) يقابله اللون الأحمر بحيث نغير في الشرط اللون الأحمر نجعله ( > 50 )

اي لونين تقصد أخي الفاضل ؟ إذا كنت تقصد ( اللون الأحمر ) ده معناه أن الطالب راسب في هذه المادة وده ضروري لأن بحتاج حصر للطلاب الراسبين في المواد ( معناه حضر بس رسب ) وكمان ( غ ) ده كمان ضروري لأن بيطلب مني عدد الطلبة الغائبين ( معناه لم يحضر الامتحان يعني غائب ) وبالتالي فيه فرق بينهما

انظر حضرتك الصورة من واقع الاستعلام qry_master الطالب حصل علي الدرجة النهائية الثلاث مواد ورغم كده ( اللون أحمر والتقييم لم يتقن المعارف ) يعني كده راسب في الثلاث مواد ؟؟؟ أنا ملاحظ ان حضرتك في الوحدة النمطية بتطبق جميع المواد علي أنها من 100 ولكن فيه مواد من 100 ومواد من 20 ولا انا خطأ

تفضل يا أخي وأنا آسف بتعب حضرتك معاي Dat1.accdb