获取给定开始日期的星期日和结束日期的星期六

Question

我想将我的开始日期更改为StartDate和EndDate的星期日至星期六的EndDate.Suppose我的StartDate是2014年4月23日，它将成为20-04 -2013和我的EndDate是13-05-2014，它将成为17-05-2014。我如何实现这是vb.net。简而言之我想要的是将我的StartDate转换为给定日期周的星期日和给定日期周的EndDate到星期六。

Answer 1

这些是否适用于您的目的？

Function GetPreviousSunday(fromDate As Date) As Date
    Return fromDate.AddDays(0 - fromDate.DayOfWeek)
End Function

Function GetNextSaturday(fromDate As Date) As Date
    Return fromDate.AddDays(6 - fromDate.DayOfWeek)
End Function

你甚至可以把它变成一个功能：

Function GetRelativeWeekdayDate(fromDate As Date, relativeToWeekdayNum As Integer) As Date
    Return fromDate.AddDays(relativeToWeekdayNum - fromDate.DayOfWeek)
End Function

星期日你可以这样打电话：GetRelativeWeekdayDate(StartDate, 0)这个星期六：GetRelativeWeekdayDate(EndDate, 6)。