1. 当前日期
Now.ToString("yyyy-MM-dd")
2. 7天前的日期
Now.AddDays(-7).ToShortDateString
3. 6个月后的日期
Now.AddMonths(6).ToShortDateString
4.上一周的周数
DatePart(DateInterval.WeekOfYear, Date.Today.AddDays(-7), FirstDayOfWeek.Monday,FirstWeekOfYear.FirstFullWeek).ToString
如果个位想补零 .ToString("00")