我怎么才能获得系统时间用于和整数比较呢?

解决方案 »

  1.   

    day(now())
    year(now())
    ......
      

  2.   

    if cdate("15:00:00")=time then 
        'handle
    endif
      

  3.   

    dim i'系统时间dt
    dim dt as date
    dt = date'年
    i = year(date)
    '月
    i = month(date)
    '日
    i = day(date)
    '时间tm
    dim tm
    tm = time()'时
    i = hour(time())
    '分
    i = inute(time())
    '秒
    i = second(time())
      

  4.   

    更正一下。
    '分
    i = minute(time())
      

  5.   

    将小时、分和秒提出来计算就可以了
    intHoure=Format(time, "hh")
    intMinute=format(time,"nn")
    intSecond=format(time,"ss")