[Mohammed Nafa]

السلام عليكم ورحمة الله وبركاته...
أرجو المساعدة بتميز السنة الكبيسة لاضافة 28 يوم أو 29 كما هو مرفق بالصورة ...اذ تظهر الرسالة التالية ...
وشكرا لكم...

lbEB01.Text = EB_Monthly
                EB_Month_START = OLL02.Text + "/" + "01" + " " + "00:00:01"
                If bLeapYear = Date.IsLeapYear(OLB02.Text) = True Then
                    EB_Month_END = OLL02.Text + "/" + "29" + " " + "23:59:59"
                ElseIf bLeapYear = Date.IsLeapYear(OLB02.Text) = False Then
                    EB_Month_END = OLL02.Text + "/" + "28" + " " + "23:59:59

        End If

[Mohammed Nafa]

السلام عليكم ورحمة الله وبركاته...
الغوث الغوث يا أهل العلم والمعرفة ...