# Re: 新手发问: 时间的加减

Posted by 小琳 on September 17, 1999 at 19:53:15:

In Reply to: Re: 新手发问: 时间的加减 posted by q on September 16, 1999 at 22:26:20:

: : 请问如果程式设定每日14:00 至 16:00 每隔 15分钟30秒 要作一个job
: : 程式该如何写?

: : 难道要用以下这种笨方法吗?
: : 还得设定timer 随时检查现在时刻严重消耗系统资源

: : Private Sub Time_now_Timer()

: : 现在时刻_时 = Val(Left(现在时刻, 2))
: : 现在时刻_分 = Val(Mid(现在时刻, 4, 2))

: : if 14<现在时刻_时<16 and ....
: : then do some job
: : endif

: : End Sub

: : 请不吝指点, 谢谢!

:

# ~~

:::这是没有办法的，因为VB不会知道现在的时间，所以
必须每一次呼叫系统的时间，VB才会知道!!!

Follow Ups:

- Re: 新手发问: 再请问时间的加减 Alex 21:40:35 9/17/99 (1)
  - Date and Time function wei 00:46:36 9/18/99 (0)