在VB.NET中定义"下个月"日期范围

Question

在我的VB应用程序中,我们可以根据各种预定义的日期范围运行报告,例如"本周"和"上个月".我想为'下个月'添加一个新范围.

我们定义的现有日期范围似乎与我迄今为止找到的其他解决方案的编码方式不同.我也尝试过变化,我认为这些变化是合乎逻辑的,可以证明是正确的.可悲的是,我还没有成功.

我们目前在VB中定义的范围格式如下:

            Case 3 'This Week
            StartDate = Now.Date.AddDays(-Now.Date.DayOfWeek)
            EndDate = Now.Date.AddDays(6 - Now.Date.DayOfWeek)
        Case 4 'This Month
            StartDate = Now.Date.AddDays(-(Now.Day - 1))
            EndDate = New DateTime(Now.Year, Now.Month, Date.DaysInMonth(Now.Year, Now.Month))

Answer 1

下个月很容易:

Dim nexMonth = Date.Today.AddMonths(1)
StartDate = New Date(nexMonth.Year, nexMonth.Month, 1)
EndDate = StartDate.AddMonths(1).AddDays(-1) ' or like you did in Case4 but with nexMonth