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

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