السلام عليكم و رحمة الله و بركاته
مبارك عليكم الشهر ..
أخواني.
واجهتني مشكلة في برنامج اقوم بعمله..
وضعت الكود التالي في Form Load لواجهة معينة... تحتوي على تاريخ بداية و نهاية
و يفترض عند اقتراب تاريخ الانتهاء تظهر رسالة تحذيرية
و يتغير لون السجل الموجود في اللستة الى اللون الاحمر او الاصفر..
لكن هذا لا يتحقق ..لماذا؟
يعطني رسالة خطأ يقول فيعا Type mismatch
ما لخطأ في الكود المكتوب اذا تكرمتم؟
If "Exp_Date" > Date Then
MsgBox " an item is expired"
ListData.BackColor = "&H0000FFFF&"
End If
هذه الارقام تمثل اللون الاصفر "&H0000FFFF
