now里面包括了你要的所有信息，要分别提取出来的话你就：format(now,"yyyy-mm-dd") 日期format(now,"hh:mm:ss") 时间
显示系统当前日期：date显示系统当前时间:time
msgbox now时间函数 还有 date,time ,week,year,mouth,day
label1=now
