获取年 月 日

 　　yyyy 年

　　q 季

　　m 月

　　y 一年的日数

　　d 日

　　w 一周的日数

　　ww 周

　　hh 时

　　n 分钟

　　s 秒

　　如  
t0 = now
delay 5000
dt = DATEDIFF("s", t0, Now)
dt = abs(dt)
messagebox dt
结果是5

whilt dt  < guaji