检查年龄是否周岁

Year(Date())-Year(DDate)+IIF(MONTH(Date())-MONTH(DDate)<0,-1,IIF(Day(Date())-Day(DDate)>=0,0,-1))
2015-02-17 21:07 | 阅读 2226 次 | 评论 2 条

儿童年龄的计算

Clear 出生日期={^2014.01.01} 当前日期={^2014.11.22} lnM=0 If Day(当前日期)>=Day(出生日期) 天数=Day(当前日期)-Day(出生日期)+1 Else lnM=-1 天数=Gomonth(当前日期,1)-当前日期+Day(当前日期)-Day(出生日期)+1 EndIf 总月数=(Year(当前日期)-Year(出生日期))*12+(Month(当前日期)-Month(出生日期))+lnM ?"岁数:"+Padl(Int(总月数/12),2," ")+" 岁" ?"月数:"+...
2015-02-17 21:05 | 阅读 1225 次 | 评论 0 条

一年有多少天

Date(Year(Date()),12,31)-Date(Year(Date()),1,1)+1
2015-02-17 21:01 | 阅读 1035 次 | 评论 0 条

本季度的第一天是星期几

Dow(Date(Year(Date()),Ceiling(Month(Date())/3)*3-2,1),2)
2015-02-17 20:57 | 阅读 1093 次 | 评论 0 条

本周的周一是几号

Date()-Dow(Date(),2)+1
2015-02-17 20:54 | 阅读 948 次 | 评论 0 条

今天是一年中的第几天

Date()-Date(Year(Date()),1,1)+1
2015-02-17 20:52 | 阅读 3740 次 | 评论 0 条
浏览379315次