|
我说下原理，做个参考。 判断间隔时间可以用datediff函数，首先赋值当前日期时间函数now到变量中，然后再用datediff函数反复判断时间间隔是否到达15分钟。 推荐用秒"s"来判断，比较准确。如果用分"n"来判断每到一整分就算1分钟（比如59秒启动，再过1秒后也算1分钟） 例： dim t t=now //赋值当前日期时间到变量t while true if datediff("s",t,now)>=900000 //如果间隔时间为15分钟 delay 50 keypress 13 1 t=now //重新赋值日期时间，以重新判断 endif //判断整点可以放这 delay 10 endwhile 然后整点怎么判断呢，首先用时间函数，now已经介绍过了，下面是时，分，秒： hour(now) //返回当前的钟点数字（时），取值0~23 minute(now) //返回当前的分钟，取值0~59 second(now) //返回当前的秒数，取值0~59 知道了时分秒就不难判断整点了吧，那么难道要0点2点 4点 6点 8点 10点...... 24点逐个判断吗？不，那太麻烦了，我们可以判断hour(now)是否能被2整除，如果能的话就是偶数时间了。那怎么判断是否能被2整除呢，用mod运算符，比如： a = 10 mod 2 返回到a的结果是0，也就是能被2整除，接下来判断这个a是否为0就可以了。 留下一道习题你自己完成，嘿嘿： 整点的判断（记得要连同分和秒都判断），然后把整点判断和上面的时间间隔判断合在一起。 |
|
|
