标题：关于计算月数的问题

1楼

blackzhu 发表于：2011/7/1 8:03:00

Dim d As Double = Datediff("m",#01/03/2011#,#05/08/2011#)

Output.show(d)

我们利用datediff可以得出两个时间段的日数,约数等,我想问一下.像上面的时间段,月数应该是4个月,但是实际的应该是4个月零6天,我想要做到不满一个月的算一个月,也就是算5个月.怎么写代码?

2楼

狐狸爸爸 发表于：2011/7/1 8:14:00

Dim d1 As Date = #01/03/2011#
Dim d2 As Date = #05/08/2011#
Dim m As Integer = Datediff("m",d1,d2)
If d2.day > d1.day Then
m = m+1
End If
Output.show(m)

3楼

blackzhu 发表于：2011/7/1 8:19:00

谢谢

共3 条记录, 每页显示 10 条, 页签: [1]

[Full] 完整版
[Rss] 订阅
[Xml] 无图版
[Xhtml] 无图版