Thứ Tư, 5 tháng 11, 2008

Code lấy ngày đầu và ngày cuối cùng của 1 tháng

Dim Calendar As New System.Globalization.GregorianCalendar()

'Ngày đầu tiên của tháng lúc nào cũng là ngày 1
Dim firstDayOfMonth As New DateTime(DateTime.Now.Year, DateTime.Now.Month, 1)

'Lấy ngày cuối cùng của tháng
Dim lastDayOfMonth As New DateTime(DateTime.Now.Year, DateTime.Now.Month, Calendar.GetDaysInMonth(DateTime.Now.Year, DateTime.Now.Month))

Không có nhận xét nào: