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

时间:2014-04-23 15:34:48

标签: vb.net

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

1 个答案:

答案 0 :(得分:2)

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

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)