منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : تغيير اللون تلقائياً عند إقتراب نهاية العقد
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الأخوة الأعزاء

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

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

علماً بأن اللون الأخصر الموجود بالصورة هو Label
وعليكم السلام ورحمة الله وبركاته

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

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

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