计算一个月中的天数

有没有计算一个月内天数的方法？计算一个月中的天数

2010-04-20 Luca Romagnoli

当然，这是30.6 – 2010-04-20 14:13:58

其实，它更接近30.436875平均。 400年内有（（365 * 3 + 366）* 25-1）* 4 + 1或146,097天。 – paxdiablo 2010-04-20 14:22:15

是：

Const July As Integer = 7 
Const Feb As Integer = 2 

' daysInJuly gets 31. ' 
Dim daysInJuly As Integer = System.DateTime.DaysInMonth(2001, July) 

' daysInFeb gets 28 because the year 1998 was not a leap year. ' 
Dim daysInFeb As Integer = System.DateTime.DaysInMonth(1998, Feb) 

' daysInFebLeap gets 29 because the year 1996 was a leap year. ' 
Dim daysInFebLeap As Integer = System.DateTime.DaysInMonth(1996, Feb)

幸得MSDN。

来源

2010-04-20 14:07:03

如果你正在寻找的天数，这个工程。如果你正在寻找一个天数列表，请使用下面的示例。 – NibblyPig 2010-04-20 14:12:31

http://authors.aspalliance.com/aspxtreme/sys/DateTimeClassDaysInMonth.aspx

Public Shared Function DaysInMonth (_ 
    ByVal year As Integer, _ 
    ByVal month As Integer _ 
} As Integer

来源

2010-04-20 14:07:56 Svisstack

Dim d As New DateTime(2010, 4, 1) 

Dim month As Integer = d.Month 

While d.Month = month 
    Console.WriteLine(d.[Date]) 
    d = d.AddDays(1) 
End While

当然你可以改变的日期如何输出对其进行格式化，以你的意志。

来源

2010-04-20 14:08:28 NibblyPig

使用数组：[31,28,31,30,31,30,31,31,30,31,30,31] 如果（year mod 400 = 0）或（（year MOD 4 = 0），而不是（年MOD 100 = 0））

来源

2010-04-20 14:13:36 Ron

-1

有两种简单的解决方案：

5546>>m&1|30^(m==2)*2+(m==2&&y%4==0)))

或

(62648012>>m*2&3)+28+(m==2&&y%4==0)))

其中m是月和y的数量是那一年。

这个解决方案下面是一样的数组，但是数组是用幻数掩盖的。

来源

2012-07-26 18:18:37 olivecoder

要获得当月的天数

Dim CurrentMonthDays As Int16 = DateTime.DaysInMonth(DateTime.Now.Year,DateTime.Now.Month)

来源

2012-10-30 13:49:02

计算一个月中的天数

回答

相关问题