论坛 › 已解决问题区 › 【已解决】关于时间对比的问题！

xuanfeng1234567 发表于 2010-10-30 22:07:52

【已解决】关于时间对比的问题！

本帖最后由 xuanfeng1234567 于 2010-10-30 23:52 编辑

Dim $a , $b ,$st,$cl
$a = "8:00"
$b = "20:00"
$st = StringRegExpReplace($a, '[^\d]', '')
$cl = StringRegExpReplace($b, '[^\d]', '')
While 1
        If $cl> $st Then        Run("H:\聊天冲浪\腾讯QQ2010\Bin\QQ.exe")       
        Sleep(100)
WEnd
为什么会运行不了QQ呢？
大大们帮帮忙！

afan 发表于 2010-10-30 22:16:28

If Number($cl) > Number($st) Then ...

lpxx 发表于 2010-10-30 23:12:29

你把代码稍微改一下看看就知道为什么不能运行了。
Dim $a , $b ,$st,$cl
$a = "8:00"
$b = "20:00"
$st = StringRegExpReplace($a, '[^\d]', '')
MsgBox(0,"",$st)
$cl = StringRegExpReplace($b, '[^\d]', '')
MsgBox(0,"",$cl)
While 1
      If $cl> $st Then      Run("H:\聊天冲浪\腾讯QQ2010\Bin\QQ.exe")      
      Sleep(100)
WEnd

xuanfeng1234567 发表于 2010-10-30 23:51:54

谢谢大大们的指点，受教了！！！用的是afan大大的！

the886 发表于 2010-11-26 14:24:23

学习了..............

查看完整版本: 【已解决】关于时间对比的问题！