Dim currentTime = New Date(Now.Year, Now.Month, Now.Day)
Dim startOfWeek = currentTime.AddDays(-currentTime.DayOfWeek)
Dim endOfWeek = startOfWeek.AddDays(7)
Dim result = String.Format("Today: '{0:yyyy-MM-dd}' / Start of week: '{1:yyyy-MM-dd}' / End of week '{2:yyyy-MM-dd}'", currentTime, startOfWeek, endOfWeek)
' result = "Today: '2016-03-16' / Start of week: '2016-03-13' / End of week '2016-03-20'"
1 回答
您可以使用属性
DayOfWeek
:(请注意,
currentTime
是以这种方式创建的,以便将所有小时/分钟/ secons / millisecons设置为零)...所以如果您的唯一输入是周数,在这种情况下,您可以通过这个简单的转换轻松找到所需的
currentTime
: