VB.NET - 计算两个日期之间的天数(排除)

Question

我正在尝试计算两个日期之间的天数，不包括星期六和星期日。到目前为止我已经编写了这段代码

Dim startDay As Integer
Dim endDay As Integer
Dim days As Integer
Dim count As Integer

startDay = dtpStartDate.Value.DayOfWeek
endDay = dtpEndDate.Value.DayOfWeek

For days = startDay To endDay
    If days = 0 Or days = 6 Then           'Sunday = 0, Saturday = 6
        count += 1
    End If
Next

    lblNoOfDays.Text = count

如果您选择同一周内的两个日期，效果很好。 (例如:1 月 23 日至 1 月 27 日，结果为 5)但是，如果我将它们设置为不同星期的日期(例如:1 月 23 日到 1 月 30 日，给出结果 1)，则会给出不正确的结果。

我知道这是由于循环而发生的，但我想不出一种方法来克服这个问题。谁能给我一个建议、解决方案吗？

谢谢

Answer 1

Dim count = 0
Dim totalDays = (dtpEndDate - dtpStartDate).Days

For i = 0 To totalDays
    Dim weekday As DayOfWeek = startDate.AddDays(i).DayOfWeek
    If weekday <> DayOfWeek.Saturday AndAlso weekday <> DayOfWeek.Sunday Then
        count += 1
    End If
Next

lblNoOfDays.Text = count