@@@ مساعدة في التحكيم في لون التعبئة و الخط في حالة عدم تمكين الحقل @@@

[nabilalibibo]

السلام عليكم اخواني اعضاء المنتدى و رمضان كريم 

هل ممكن التحكم في لون التعبئة و الخط في حالة عدم تمكين الحقل و شكرااااا

[د.كاف يار]

تفضل 

[TexBox1].ForeColor = RGB(0, 0, 128)      '   التحكم بلون الخط
[TexBox1].FontBold = False       ' عرض الخط عادي
[TexBox1].FontBold = True       ' عرض الخط سميك

هذا موقع لمكتبة الألوان مفيد جدا مكتبة الألوان RGB

[nabilalibibo]

استاذي الفاضل د كاغ يار نقبل الله صيامك

انا اقصدي التحكم في لون الخط في حل جعلت  خاصية ممكم - لا- من تبويب البيانات

[Eng.Qassim]

استخدم هذا الكود في حدث الحالي

Private Sub Form_Current()
If Not IsNull(Me.EmployeeID) Then
 Me.EmployeeID.Locked = True
 Me.EmployeeID.Enabled = False
 Me.EmployeeID.BackColor = vbYellow
Me.EmployeeID.ForeColor = vbRed

Else
 Me.EmployeeID.Locked = False
 Me.EmployeeID.Enabled = True
 Me.EmployeeID.BackColor = vbWhite
End If
End Sub