Question

如何使用vb.net计算下个月的最后一天？

Answer 1

尝试使用DaysInMonth函数返回所需月份的天数。

示例

System.DateTime.DaysInMonth(2016,May)

这将返回（31），因此您可以获取此数字之外的日期格式以获取本月的最后一天。

Answer 2

如果您在实际日期之后....

您可以使用DateSerial(Year, Month, 0)这将返回输入月份前一个月的最后一天。

输入DateSerial(2016, 07, 0)将返回“2016年6月30日”

要获得下个月的最后一天，请DateSerial(Now.Year, Now.Month + 2, 0)

这适用于2月和年末（DateSerial(2016, 3, 0)返回“29/02/2016”，DateSerial(2016, 11 + 2, 0)返回“2016年12月31日”）

Answer 3

另一种方法是获取一个月后的第一天并减去1天。

    Dim d As DateTime

    d = DateTime.Now.AddMonths(2)
    d = New DateTime(d.Year, d.Month, 1).AddDays(-1)

Answer 4

Dim N = DateTime.Now.AddMonths(1)
Dim D = New DateTime(N.Year, N.Month, DateTime.DaysInMonth(N.Year, N.Month))

D将在下个月的最后一天举行。