[Microformt]

(17-03-20, 07:00 AM)سعود كتب :

إقتباس :اخي العزيز :سعود
السلام عليكم
 هل يمكن تطبيق الفكره على ComboBox بدل من text ؟؟
تحياتي

وعليكم السلام ورحمة الله وبركاته
اخي الكريم نعم اذا تم العثور على الحدثين GotFocus  و   LostFocus
لكن هل هذا هو المطلوب للسائل؟؟

---

PHP كود :

Private Sub ce(ByVal a As Control, ByVal b As Boolean)
If (TypeOf a Is TextBox Or TypeOf a Is ComboBox) And (b = True) Then
a.BackColor = vbYellow
Else
a.BackColor = vbWhite
End If
End Sub
Private Sub Combo1_GotFocus()
ce Combo1, True
End Sub
Private Sub Combo1_LostFocus()
ce Combo1, False
End Sub
Private Sub Text1_GotFocus()
ce Text1, True
End Sub
Private Sub Text1_LostFocus()
ce Text1, False
End Sub
Private Sub Text2_GotFocus()
ce Text2, True
End Sub
Private Sub Text2_LostFocus()
ce Text2, False
End Sub
Private Sub Text3_GotFocus()
ce Text3, True
End Sub
Private Sub Text3_LostFocus()
ce Text3, False
End Sub 


اخي العزيز : سعود
 السلام عليكم ةرحمة وبركاته
 لكم مني جزيل الشكل والتقدير
وجزكم الله عني با الجنه يارب
 تحياتي