• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.3.8
软件大小:62.5M
更新时间:12-18

按键精灵iOS版
立即下载

软件版本:1.6.8
软件大小:29.2M
更新时间:03-03

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[已解决] 求问版主 [复制链接]

1#
Call 时间判断1()

Sub 时间判断1()
Dim MyTime
MyTime = Time
If MyTime > "03:00:00"and MyTime < "03:04:00" Then
TracePrint "到时间了,开始找狗"
Delay 2000
Call 找狗()
Delay 2000
Else
TracePrint "时间1至时间2"
Delay 3000
Call 时间判断2()
End If
end Sub

Sub 时间判断2()
Dim MyTime
MyTime = Time
If MyTime > "03:30:00"and MyTime < "03:34:00" Then
TracePrint "到时间了,开始找狗"
Delay 2000
Call 找狗()
Delay 2000
Else
TracePrint "时间2至时间3"
Delay 3000
Call 时间判断3()
End If
End Sub

这个在白天测试没有问题,但是晚上挂这个时间段Call 找狗()从未执行,为何0点后的时间判断不准了?

本主题由 超级版主 瑞祥幽冥狼 于 2021/4/6 14:07:09 执行 审核帖子 操作
2#

回复 1楼lhz8366的帖子

注:你好 加上CDate 参下面例子 已测试无误 若你那边依然异常 再各个关键位置加TracePrint查出问题所在
  1. If CDate(Time) > CDate("03:00:00") and CDate(Time) < CDate("03:04:00") Then
  2. MessageBox "时间到做事!"
  3. End If
复制代码

最后编辑瑞祥幽冥狼 最后编辑于 2021-04-06 10:23:03
收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
3#

if time >= "04:45:00" or time >= "04:50:00" then
请问我之前用过 if time 为何不好用 他和If CDate(Time) 有什么本质区别吗
'

4#

回复 3楼lhz8366的帖子

CDate("03:00:00")'字符串转时间表达式
"03:00:00"'字符串
时间格式字符串不能直接进行判断对比

收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
5#

感谢 学到了

发新话题 回复该主题