17-03-20, 02:15 AM
(آخر تعديل لهذه المشاركة : 22-03-20, 12:32 AM {2} بواسطة Amir_Alzubidy.
تعديل السبب: تعديل العنوان
)
السلام عليكم
اريد عند الضغط على اى تكست موجود فى الفورم يتحول لون خلفية التكست بوكس الى الاصفر
انا جربت هذا الكود ولكن اعطانى خطا
ارجوتعديل الكود اساتذتى الكرام ولكم جزيل الشكر
اعتقد الخطاء فى جملة c_gotfocus
كيف اضعها واين
ارجو المساعدة جزاكم الله خيرا
اريد عند الضغط على اى تكست موجود فى الفورم يتحول لون خلفية التكست بوكس الى الاصفر
انا جربت هذا الكود ولكن اعطانى خطا
ارجوتعديل الكود اساتذتى الكرام ولكم جزيل الشكر
كود :
Public Function color(frm As Form)
Dim C As Control
For Each C In frm.Controls
If TypeOf C Is TextBox Or TypeOf C Is ComboBox And c_gotFocus() Then
C.BackColor = &HFFFFFF
End If
Next C
End Functionكيف اضعها واين
ارجو المساعدة جزاكم الله خيرا

