回复 maplee 后面的date返回的内容形式,和你电脑的设置还有些关系的。 或者你这样写: 黑羽祭 发表于 2013-6-5 09:37
DateNow=Year(Date)&Right("0"&Month(Date),2)&Right("0"&Day(Date),2) CheckProperty(value, DateNow) feiyunkai 发表于 2013-6-5 10:58
好方法都被楼上用了,我来个笨笨的方法: y=year(date) m=month(date) if m 跑跑跑跑 发表于 2013-6-6 09:01