计算闰年主要是为了判断2月份的天数,一般闰年2月份是29天,平年2月份是28天。计算闰年的算法非常简单,即:能被400整除,或者能被4整除而不能被100整除。
算法如下:
| function isLeapYear(pYear) set oreg=new RegExp oreg.Pattern="^\d{4}$" if not oreg.Test(pYear) then isLeapYear=false exit function end if oYear=clng(pYear) if ((oYear mod 4=0 and oYear mod 100〈〉0) or oYear mod 400=0) then isLeapYear=true else isLeapYear=false end if end function |




文章评论
评论内容只代表网友观点,与本站立场无关! 查看更多评论