Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
这样对吗?
Dim d1 As Date = #3/17/2002 12:30:29#
Dim d2 As Date = #1/1/2008 10:11:49#
Dim m1 As Integer = 12-d1.month
Dim m2 As Integer = d2.month
Dim yy As Integer = (d2.year - d1.year-1)*12
output.show("共 " & yy+m1+m2 & " 个月")
这个好象用DateDiff简单点。
Dim d1 As Date = #3/17/2002 12:30:29#
Dim d2 As Date = #1/1/2008 10:11:49#
output.show(DateDiff("m",d1,d2))
老大,贴入地址后回车撒
http://help.foxtable.com/topics/1415.htm