تغيير لون السجل عند النقر عليه

اخي الفاضل نصيب

السلام عليكم ورحمة الله وبركاته

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

بعد اذن الاخ نصيب

الاخت زهره ياليت توضحي لو كان النموذج فيه حقول تتكون من :

الاسم

الرقم

المدينه

الى اخره

عند التركيز على الاسم وهكذا

شكرا اخت زهرة لإهتمامك .

ولقد وجدت الحل بهذا الكود

Me.aa.ForeColor = RGB(0, 255, 64)

ولكن لي استفسار بسيط

وهو كيف اجعل النموذج يقوم بعرض السجلات بشكل ألي , يعني عرض السجل الاول ثم السجل الثاني ثم الثالث وهكذا حتى الوصول للسجل الاخير , حيث لايوجد سجلات

ثم الرجوع وعرض السجل الأول . اي عملية تكرار العرض

شكرا مرة اخرى

تحياتي

الأخ الكريم ارجوا وضع مثال على إستخدام الكود السابق

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

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

عند التركيز على حقل الاسم

Private Sub NAME_LostFocus()
Me!NAME.ForeColor = RGB(0, 0, 0)
Me!Number.ForeColor = RGB(0, 0, 0)
Me!CITY.ForeColor = RGB(0, 0, 0)
End Sub

عند فقد التركيز على حقل الاسم

Private Sub NAME_GotFocus()
Me!NAME.ForeColor = RGB(255, 0, 0)
Me!Number.ForeColor = RGB(255, 0, 0)
Me!CITY.ForeColor = RGB(255, 0, 0)
End Sub

وهذا مثال

EMP.rar

اخي نصيب هل من الممكن تضع سؤالك في مشاركة جديده غير هذه المشاركة لانك تسأل عن التحريك التلقائي للسجلات وسنجيبك عليها .

الأخت الكريمة شكر الله لك وأحسن إليك

شكرا أخت زهرة على هذا التواصل .

تحياتي