.net 里面的每周第一天默认是星期日,实在是不符合中国人的行为习惯。
以下函数 可以返回 传入日期所在星期的第一天,可自定义星期的第一天 是星期一、二、三 … … 日
Private Function FirstDayOfWeek(ByVal day As DateTime, ByVal weekStarts As DayOfWeek) As DateTime Dim d As DateTime = day Do While d.DayOfWeek <> weekStarts d = d.AddDays(-1) Loop Return d End Function