' Add or subtract a number of business days from a date' Example: Debug.WriteLine(BusinessDateAdd(#4/9/2003#, 5)) ' => 4/16/2003Function BusinessDateAdd(ByVal startDate As Date, ByVal days As Integer, _ Optional ByVal saturdayIsHoliday As Boolean = True) As Date Do While days ' increment or decrement the date startDate = startDate.AddDays(Math.Sign(days)) ' check that it is a week day If startDate.DayOfWeek <> DayOfWeek.Sunday AndAlso (startDate.DayOfWeek _ <> DayOfWeek.Saturday Or Not saturdayIsHoliday) Then ' days becomes closer to zero days -= Math.Sign(days) End If Loop Return startDateEnd Function


10 Productivity Hacks to Supercharge Your Business in 2023
Picture this: your team working seamlessly, completing tasks efficiently, and achieving goals with ease. Sounds like too good to be true? Not at all! With our productivity hacks, you can