03-03-20, 05:36 PM
(آخر تعديل لهذه المشاركة : 04-03-20, 12:03 AM {2} بواسطة Mohammed Nafa.)
السلام عليكم ورحمة الله وبركاته...
أرجو المساعدة بتميز السنة الكبيسة لاضافة 28 يوم أو 29 كما هو مرفق بالصورة ...اذ تظهر الرسالة التالية ...
وشكرا لكم...
أرجو المساعدة بتميز السنة الكبيسة لاضافة 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
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