منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تغيير اللون تلقائياً عند إقتراب نهاية العقد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تغيير اللون تلقائياً عند إقتراب نهاية العقد (/showthread.php?tid=50518)

تغيير اللون تلقائياً عند إقتراب نهاية العقد - F.H.M - 24-10-24

الأخوة الأعزاء

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

لدي مشروع لحفظ عقود العمل وأريد عند إقتراب نهاية العقد بـ 6 شهور يتغير لون Label من الأخضر إلى الأحمر كما بالصورة المرفقة

علماً بأن اللون الأخصر الموجود بالصورة هو Label

RE: تغيير اللون تلقائياً عند إقتراب نهاية العقد - Taha Okla - 24-10-24

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

كود :
       If DateTimePicker2.Value.AddMonths(-6) < Date.Now Then
           Me.BackColor = Color.Red
       Else
           Me.BackColor = Color.Green
       End If
هذا الكود وأنت عدله ع حسب رغبتك..

RE: تغيير اللون تلقائياً عند إقتراب نهاية العقد - F.H.M - 25-10-24

الله يعطيك العافية أخ طه

الكود يعمل على أكمل وجه

الله يجزاك خير ولا يحرمنا منك ولا من علمك