Do while Hour(now) =16 and Minute(now) =17 //运行时是16:17才有效 MsgBox "times up" exit do //运行一次即退 Loop Do while Hour(now) 16or Minute(now) 17 Delay 200 Loop TracePrint "times up" Do until Hour(now) = 16 and Minute(now) = ...
ProcessID=Plugin.Web.Bind("WQM.exe") Delay 500 If ProcessID=0 then MessageBox "网页按键精灵没有运行" EndScript End If Call Plugin.Web.Tips("脚本开始运行") Call Plugin.Web.SetSize(1600,916) Call Plugin.Web.Go("http://www.excelpx.com/home.php?mod=spacecpac=profile") Call Plugin. ...