تشغيل استعلام على كامل قاعده اكسس عند بدء تشغيل البرنامج

[رمضان صادق]

السلام عليكم 

تشغيل استعلام على كامل قاعده اكسس عند بدء تشغيل البرنامج 

والمطلوب بعد اذنكم حضراتكم 

اذا كان الحقل aa الذى هو عباره عن تاريخ اصغر او يساوى تاريخ اليوم تصبح قيمه الحقل[ xx] "منتهى" 

اما اذا كان اكبر من تاريخ اليوم تصبح قيمه الحقل [xx ] "سارى" 

اذا كان فارغ لا يعمل شئ

تانى طلب اريد برمجه 3 ازرار واحدا  لتغيير حجم الخط بحقل محدد وثانى لتغيير خلفيه الحقل وثالث لتغيير لون الخط

واكون شاكرا لسيادتكم 

 

[محمد احمد لطفى]

 أول طلب  يمكن عمل ذلك عن طريق استعلام تحديث 
وسوف يتم عمله على جميع الجداول  وتحويله الاستعلامات الى vba و تشغيله عند فتح البرنامج بالتوفيق 

ثانيا 
 

    Me![Filed].BackColor = vbRed
    Me![Filed].ForeColor = vbWhite
    Me.Filed.FontSize = 22

بالتوفيق

 

تم تعديل مايو 6, 2023 بواسطه محمد احمد لطفى

[رمضان صادق]

ممكن من فضلك عمل  استعلام كمثال 

 

[محمد احمد لطفى]

    تفضل اذا فتحت النموذج سيم التنفيذ بالتوفيق   

 

Test.mdb

[رمضان صادق]

الف شكر 

لك كل الاحترام والتقدير