total number of weekdays in a period

 Public Shared Function TotalNumberOfSessions(ByVal weekdays As List(Of Integer), ByVal startDate As Date, ByVal endDate As Date)
        Dim count As Integer = 0
        Dim totalDays = (endDate – startDate).Days
        For i = 0 To totalDays
            Dim weekday As DayOfWeek = startDate.AddDays(i).DayOfWeek
            If weekdays.Contains(weekday) Then
                count += 1
            End If
        Next
        Return count
    End Function

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Google photo

You are commenting using your Google account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s