获取时间小结

获取系统的日期和时间

第一种：

sysdate= Cstr(date)  '获取系统当前日期
systime=cstr(time)   '获取系统当前时间

第二种：

mytime=now  '获取系统当前日期和时间

第三种：

formatdatetime(now(),2)  '获取系统当前日期
formatdatetime(now(),4)  '获取系统当前时间

第四种：

mm=minute("21:10:03")  '获取系统当前分钟值
hh=hour(now)    '获取系统当前小时值
dd=day("October 23,2011")     '获取系统当前日值
mo=month("2011-10-23")  '获取系统当前月值

ti=timevalue(now)   '获取系统当前时间

应用小例（抄袭，嘿嘿）：

mytime=now             '包含当前的日期和时间
myhour=hour(mytime)
urtime=timevalue("21:35:17")
if myhour<hour(urtime)  then
msgbox"还没到点！"
else
msgbox "超过指定时间了！"
endif