讨教日期计算的算法？

Question

DateDiff("m", NewDate, OldDate)

Answer 1

DateDiff 函数
返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。
如要返回两个日期的相隔的月用下面的方法
msgbox DiteDiff("m",date1,date2)
后两个参数是两个日期
第一个参数如下设置
interval 参数的设定值如下：设置 描述 
yyyy 年 
q 季 
m 月 
y 一年的日数 
d 日 
w 一周的日数 
ww 周 
h 时 
n 分钟 
s 秒 

Answer 2

Datediff这个函数我知道，但是并不是很准确啊！
比如说：2000－03－01和2000－03－30，在实际使用之中，很可以算是一个月啊 ！比如一个工人1号上班，到30号了，该不该算是工作了一个月呢？

Answer 3

那就再加上天数比较。算法应该不难啊。
if day(date2)-day(date1)>=30 then
mymonth=mymonth+1
elseif day(date2)-day(date1)<=-30 then
mymonth=mymonth-1
end if

Answer 4

beesoft(水妖) :我就是举个例子啊，如果是当月3号，到当月20号呢？现实中也是要算一个月的啊！