kha9009lid

اضافة لما اشار الية الاستاذ @husamwahab يمكن استخدام كود الرقم مباشرة للالوان ..........BackColor = 16250095 اود ان اضيف بعض الادوات المساندة لاختيار الالوان لقاعدة البيانات هذه الصفحة تحتوي على مجموعة كبيرة من الالوان بثلاث صيغة تعمل مع اكسس اداة صغيرة لمعرفة كود اللون لاي موقع او برنامج قاعدة بيانات لتحويل كود اللون لصيغة الوان اكسس الرقمية او صيغة Hex او R G B الملف في المرفقات Colors.rar

جرب >="45"

مع ذلك ممكن عملها بدون الى الحاجة الى عدة تقرير وعدة استعلامات تقرير واحد مبني على استعلام واحد ويكون معيار الاستعلام حقل في نموذج ويتم اختيار التصفية من قائمة منسدلة تحتوي على ممتاز جيد جدا جيد مقبول راسب

استخدم Between 45 And 50 في معيار الاسعلام للدرجة

التصفية يقصد فيها اظهار سجلات وفق معايير محددة ولكن انت حسب فهمي ترغب في جملة شريطة لاستخراج التقدير المستحق للطالب حسب الدرجة اذا كان فهمي صحيح ممكن عمل ذلك بالعديد من الطرق ولكن دائما الحل الاسهل اقرب الى الذهن وسوف اشرح ذلك باستخدام طريقتين الطريقة الى الاولى باستخدام دالة IIf ولها وسيطتين اذا حضر الطالب الاختبار فهو ناجح او راسب Expr1: IIf([الدرجة] Between 90 And 100;"ممتاز";IIf([الدرجة] Between 89 And 75;"جيد جدا";IIf([الدرجة] Between 74 And 64;"جيد";IIf([الدرجة] Between 63 And 50;"مقبول";"راسب")))) الطريقة الثانية باستخدام الدالة Switch وتتميز بتعدد الاحتمالات

اللهم اشفي والديه بمنك وكرمك شفاءا لا يغادر سقما وجميع مرضا المسلمين ومتعهم بالصحة والعافية ما أحييتهم يا رب العالمين اللهم اجعل ما أصبتهم رفعة في درجاتهم وزيادة في أجورهم يا رب العالمين آمين الحقيقة اكثر مالفت نظري وجعلني اقف لك بكل احترام وتقدير كود xml في جدول USysRibbons وبالرغم من اجادتي لهذة اللغة واستخدامي لها في اكسس وغيرها الا اني اجد الكود الذي قمتم بكتابتة رائع ومختصر ويؤدي المطلوب بشكل جميل ويجيب عن استفسارات كثيرة لرواد الموقع واعتبره مرجع لمن يريد انشاء قوائم للاصدارات من 2007 - 2019 ولعلنا سوينا نجد وقت مناسب لشرح استخدام هذه الوسوم وخصوصا ان استخدامها لا يقتصر ع

طابعة جيدة وتستخدم ورق مقاس 80 فقط اختار عرض 7.9 وفي تنسيق التقرير ضع العرض 6.5 انظر للصورة المرفقة بالنسبة لطول الورقة غير مهم الطابعات الحرارية تطبع الرول حسب طول التقرير ويتم قطع الورقة من خصائص الطابعة بشكل اتوماتيكي او يدوي حسب اعدادك لها

وعليكم السلام لبرامج الكاشير نعمل تقرير ويكون عرض التقرير مناسب لحجم طابعات الكاشير من اشهر الطابعات لفواتير المبيعات طابعات ابسون وتستخدم عدة مقاسات من الرول من اكثرها استخدام رولات 80 الطريقة تعرف الطابعة على الجهاز ثم تصمم التقرير ومن شاشة اعداد الصفحة للتقرير نختار حجم الورق انظر الصور المرفقة مع التاكيد في حالة عدم توفر الطابعة لديك بامكانة البحث عن برنامج الطابعة وتنصيبة في جهازك ثم تعد التقرير المطلوب مع الاحاطة بانه من قوانين الموقع اختيار عنوان واضح للمشاركة

الشكر لله اخي احمد🌹

بعد اذن اخي محمد كود مختصر ممكن عن طريق كود استعلام على اساس الرقم الفردي يبقى صفر والرقم الزوجي اي ما يقبل القسمة على 2 يحدث ابى 1 DoCmd.RunSQL "UPDATE tblNumbers SET tblNumbers.chkdays = 1 " & vbCrLf & _ "WHERE (((IIf([mynumber] Mod 2=0,""Even"",""Odd""))=""Even""));" للتصفير DoCmd.RunSQL "UPDATE tblNumbers SET tblNumbers.chkdays = 0;" TestDB.accdb

هو نفس كود الاستاذ احمد ولكن اضفنا كود يعمل ازاحة بعد كتابة الحرف مع احتفاظ مربع النص بالقيمة المسجل قبل الازاحة الكود المضاف تجدة في حدث عند مفتاح للاعلى تحياتي استاذ ازهر

جرب المرفق Database001.accdb

طريقة مميزة واضافة رائعة وباستعلام واحد والاجمل انها من استاذ قدير تعلمنا منه الكثير تحياتي وتقدير لاخي واستاذي ابو عارف

ممكن عن طريق وحدة نمطية واستعلامين 2 النتيجة النهائية في استعلام q_2 ConcatRelated("[q]";"nam4";"[nb] = " & [nb];"[id]";" - ") 0.accdb

جرب المرفق من مشاركة سابقة لاستاذنا الفاضل @jjafferr 0.accdb