Question

How to use calendar for the lower time format in vb?
What i try to achieve: if the lower date is saturday and sunday replace it for friday same week (if date = 2012-04-21 or 2012-04-22 the date = 2012-04-20).

2012-04-20T18:26:43

Thanks in advance

Answer 1

Public Shared Function NoWeekend(ByVal day As DateTime) As DateTime
    If day.DayOfWeek = DayOfWeek.Sunday Then Return day.AddDays(-2)
    If day.DayOfWeek = DayOfWeek.Saturday Then Return day.AddDays(-1)
    Return day
End Function