التبديل المستمر للون الخلفية او لون الخط في نماذج اكسس

التبديل المستمر للون الخلفية او لون الخط في نماذج اكسس

ان عملية تغيير اللون بشكل تلقائي من لون الى اخر تعتبر من الامور السهلة من الناحية البرمجية ولتنفيذ ذلك فاننا سنستخدم الدالة IF في حدث عند المؤقت (On Timer) كما سيتطلب منا معرفة ما يلي:

1- ForeColor= وتستخدم لتحديد لون النص

2- BackColor= وتستخدم لتحديد لون الخلفي

ولفهم الموضوع بشكل اكبر سنقوم بعمل نموذج جديد يحتوي على مربع نص (Text2) وتسمية (Lable2) وسنقوم بعمل تنبيه ضوئي عليها

بعد اضافة المربعات نقوم بتعديل فترة التنبيه (Timer Inteval) ونقوم باضافة الكود التالي في حدث عند التنبية (On Timer)

VBA

Private Sub Form_Timer()
'Label2 لتغيير لون الخلفية للتسمية
If Label2.BackColor = 255 Then
Label2.BackColor = 967400
Else
Label2.BackColor = 255
End If

'Text2 لتغيير لون الخط في المربع
If Text2.ForeColor = 255 Then
Text2.ForeColor = 12349952
Else
Text2.ForeColor = 255
End If
End Sub

تعليقات

المشاركات الشائعة من هذه المدونة

انشاء الجداول في اكسس

انشاء الجداول في اكسس بعد انشاء ملف اكسس جديد فان الخطوة الاولى ستكون انشاء الجداول، ولانشاء الجداول نتبع ما يلي: 1- اختيار create كما في الصورة 2- نقوم باختيار Table او Table Design والامر متروك للمستخدم، وانا بشكل شخصي افضل Table Design 3- بعد اختيار Table Design ستفتح لنا نافذة تصميم الجدول كما في الصورة 4- الحقل الاول Field Name يتم فية ادخال عناوين الاعمدة (الحقول) 5- الحقل الثاني Data Type يتم فية تحديد نوع المتغير (رقم ، نص ، تاريخ ...الخ) 6- الحقل الثالث Description وهو حقل اختياري ويتم فية ادخال وصف لهذا العمود 7- في كل جدول يجب تحديد المفتاح الاساسي ويجب ان يحتوي هذا الحقل على قيمة فريدة لا تتكرر مع اي حقل اخر. 8 - بعد الانتهاء نقوم باغلاق الجدول وعندها ستظهر نافذة لتحديد اسم الجدول وحفظة . 9- بعد فتح الجدول سيكون شكله كما في الصورة 10- نلاحظ ان عنوان العمود الاول ظهر كما تم كتابتة في التصميم اما العمود الثاني فقد ظهر اسمة باللغة العربية والسبب انه تم اضافة تسمية للعمود من خصائص الحقل اثناء تصميم الجدول كما في الصورة وبذلك يكو...

اعرف المزيد »

الشروط في الاستعلامات

الشروط في الاستعلامات يمكن اضافة الشروط في تصميم الاستعلام وعند اضافة الشرط فان الاستعلام سيقوم باظهار السجلات التي ينطبق عليها الشرط فقط، ويجب الانتباه الى انواع الحقول في الجدول قبل و ض ع الشرط لان صيغة الشرط في النص يختلف عنة اذا كنا نتعامل مع ارقام او تاريخ وسنتطرق الى هذة الانواع في هذا الموضوع. الصورة ادناة تخص تصميم الجدول الذي سنتعامل معه حيث يحتوي على اربع حقول من ظمنها اسم الطالب ونوعه نص قصير، وتاريخ الميلاد ونوعه تاريخ ووالنتيجة ونوعه رقم تم انشاء المثال اعلاة وتم تسميه الحقول باللغة العربية لتسهيل فهم الموضوع ، مع التاكيد على استخدام اللغة الانجليزية لكتابة المسميات يمكنك مشاهدة الفيديو للحصول على ايضاحات اكثر او الاستمرار بقراءة الموضوع 1- الشروط في الحقل الذي يحتوي على نص او ارتباط تشعيبي: حسب الصورة اعلاة لتصميم الجدول الخاص بنتائج الطلاب نلاحظ ان نوع البيانات في الحقل الثاني (اسم الطالب) هو نص " Short Text " وللتعامل مع هذا الحقل في الاستعلامات ، في تصميم الاستعلام يمكننا ان نظع الشروط وكم...

اعرف المزيد »

انشاء نموذج للدخول باسم مستخدم وكلمة مرور الى برنامج اكسس

انشاء نموذج للدخول باسم مستخدم وكلمة مرور الى برنامج اكسس عندما يكون البرنامج متاح لاكثر من شخص للعمل علية فلا بد من حماية البرنامج من المستخدمين غير المصرح لهم من خلال اضافة نموذج للدخول الى قاعدة الببيانات، ولانشاء نموذج الدخول الى البرنامج نتبع الخطوات التالية: انشاء جدول للمستخدمين يتم فيه تخزين اسماء المستخدمين وكلمات مرورهم ويحتوي على حقل لاسم المستخدم وحقل لكلمة المرور انشاء نموذج للدخول ويحتوي على مربعي نص غير مستندة الى مصدر بيانات، وزري امر واحد للالغاء والثاني للدخول اضافة الكود التالي في حدث عند النقر في زر موافق VBA If pas = DLookup("userpass", "tusers", "usernam='" & [usr] & "'") Then DoCmd.OpenForm "Form1" Else MsgBox "يوجد خطأ في اسم المستخدم او كلمة المرور" End If

اعرف المزيد »

مايكروسوفت اكسس

بحث هذه المدونة الإلكترونية