快捷導(dǎo)航

易語(yǔ)言通過(guò)時(shí)鐘和計(jì)次循環(huán)來(lái)實(shí)現(xiàn)定時(shí)任務(wù)的代碼

更新時(shí)間：2018年11月24日 08:35:44 作者：易語(yǔ)言源碼教程

今天小編就為大家分享一篇關(guān)于易語(yǔ)言通過(guò)時(shí)鐘和計(jì)次循環(huán)來(lái)實(shí)現(xiàn)定時(shí)任務(wù)的代碼，小編覺(jué)得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧

創(chuàng)建定時(shí)任務(wù)源碼

.版本 2
.支持庫(kù) iext
.支持庫(kù) eAPI
.程序集 窗口程序集_啟動(dòng)窗口
.子程序 __啟動(dòng)窗口_創(chuàng)建完畢
.局部變量 i, 整數(shù)型
.計(jì)次循環(huán)首 (61, i)
  .如果真 (i ＜ 25)
    時(shí)組合框.加入項(xiàng)目 (到文本 (i － 1), )
  .如果真結(jié)束
  分組合框.加入項(xiàng)目 (到文本 (i － 1), )
  秒組合框.加入項(xiàng)目 (到文本 (i － 1), )
.計(jì)次循環(huán)尾 ()
時(shí)組合框.現(xiàn)行選中項(xiàng) ＝ 0
分組合框.現(xiàn)行選中項(xiàng) ＝ 0
秒組合框.現(xiàn)行選中項(xiàng) ＝ 0
時(shí)鐘1.時(shí)鐘周期 ＝ 1000
.子程序 _按鈕_添加任務(wù)_被單擊
.局部變量 i, 整數(shù)型
.局部變量 局_是否重復(fù), 邏輯型
.局部變量 局_索引, 整數(shù)型
.計(jì)次循環(huán)首 (任務(wù)超級(jí)列表框.取表項(xiàng)數(shù) (), i) ' 過(guò)濾設(shè)置重復(fù)的時(shí)間
  .如果真 (任務(wù)超級(jí)列表框.取標(biāo)題 (i － 1, 0) ＝ 格式化文本 (“%s:%s:%s”, 時(shí)組合框.內(nèi)容, 分組合框.內(nèi)容, 秒組合框.內(nèi)容))
    局_是否重復(fù) ＝ 真
  .如果真結(jié)束
.計(jì)次循環(huán)尾 ()
.如果真 (取反 (局_是否重復(fù)))
  局_索引 ＝ 任務(wù)超級(jí)列表框.插入表項(xiàng) (, , , , , )
  任務(wù)超級(jí)列表框.置標(biāo)題 (局_索引, 0, 格式化文本 (“%s:%s:%s”, 時(shí)組合框.內(nèi)容, 分組合框.內(nèi)容, 秒組合框.內(nèi)容))
.如果真結(jié)束
.子程序 _時(shí)鐘1_周期事件
.局部變量 局_表索引, 整數(shù)型
.局部變量 局_設(shè)定時(shí)間, 文本型, , "0"
.局部變量 局_倒數(shù)時(shí)間, 整數(shù)型
.局部變量 局_當(dāng)前時(shí), 整數(shù)型
.局部變量 局_當(dāng)前分, 整數(shù)型
.局部變量 局_當(dāng)前秒, 整數(shù)型
.局部變量 局_倒數(shù)時(shí), 整數(shù)型
.局部變量 局_倒數(shù)分, 整數(shù)型
.局部變量 局_倒數(shù)秒, 整數(shù)型
局_當(dāng)前時(shí) ＝ 取小時(shí) (取現(xiàn)行時(shí)間 ())
局_當(dāng)前分 ＝ 取分鐘 (取現(xiàn)行時(shí)間 ())
局_當(dāng)前秒 ＝ 取秒 (取現(xiàn)行時(shí)間 ())
.計(jì)次循環(huán)首 (任務(wù)超級(jí)列表框.取表項(xiàng)數(shù) (), 局_表索引)
  .判斷開(kāi)始 (格式化文本 (“%d:%d:%d”, 局_當(dāng)前時(shí), 局_當(dāng)前分, 局_當(dāng)前秒) ＝ 任務(wù)超級(jí)列表框.取標(biāo)題 (局_表索引 － 1, 0))
    任務(wù)超級(jí)列表框.置標(biāo)題 (局_表索引 － 1, 2, “真”)
    ' -----------------------------以下開(kāi)始執(zhí)行定時(shí)任務(wù)-----------------------------
    .判斷開(kāi)始 (局_當(dāng)前時(shí) ＝ 12 且 局_當(dāng)前分 ＝ 30)
    .判斷 (局_當(dāng)前時(shí) ＝ 19 且 局_當(dāng)前分 ＝ 30)
    .判斷 (局_當(dāng)前時(shí) ＝ 20 且 局_當(dāng)前分 ＝ 0)
    .判斷 (局_當(dāng)前時(shí) ＝ 20 且 局_當(dāng)前分 ＝ 20)
    .判斷 (局_當(dāng)前時(shí) ＝ 21 且 局_當(dāng)前分 ＝ 0)
    .判斷 (局_當(dāng)前時(shí) ＝ 21 且 局_當(dāng)前分 ＝ 30)
    .默認(rèn)
    .判斷結(jié)束
    ' -----------------------------以上開(kāi)始執(zhí)行定時(shí)任務(wù)-----------------------------
  .默認(rèn)
    局_設(shè)定時(shí)間 ＝ 分割文本 (任務(wù)超級(jí)列表框.取標(biāo)題 (局_表索引 － 1, 0), “:”, )
    .如果真 (到整數(shù) (局_設(shè)定時(shí)間 [1]) ＜ 取小時(shí) (取現(xiàn)行時(shí)間 ())) ' 次日時(shí)間修正
      局_設(shè)定時(shí)間 [1] ＝ 到文本 (24 ＋ 到整數(shù) (局_設(shè)定時(shí)間 [1]))
    .如果真結(jié)束
    局_倒數(shù)時(shí)間 ＝ ((到整數(shù) (局_設(shè)定時(shí)間 [1]) － 局_當(dāng)前時(shí)) × 60 － 局_當(dāng)前分 ＋ 到整數(shù) (局_設(shè)定時(shí)間 [2])) × 60 － 局_當(dāng)前秒 ＋ 到整數(shù) (局_設(shè)定時(shí)間 [3]) － 1
    .如果真 (局_倒數(shù)時(shí)間 ≥ 0)
      局_倒數(shù)時(shí) ＝ 局_倒數(shù)時(shí)間 ÷ 3600
      局_倒數(shù)分 ＝ (局_倒數(shù)時(shí)間 － 局_倒數(shù)時(shí) × 3600) ÷ 60
      局_倒數(shù)秒 ＝ 局_倒數(shù)時(shí)間 － 局_倒數(shù)時(shí) × 3600 － 局_倒數(shù)分 × 60
      任務(wù)超級(jí)列表框.置標(biāo)題 (局_表索引 － 1, 1, 格式化文本 (“%d:%d:%d”, 局_倒數(shù)時(shí), 局_倒數(shù)分, 局_倒數(shù)秒))
    .如果真結(jié)束
  .判斷結(jié)束
.計(jì)次循環(huán)尾 ()
.子程序 _任務(wù)超級(jí)列表框_按下某鍵, 邏輯型
.參數(shù) 鍵代碼, 整數(shù)型
.參數(shù) 功能鍵狀態(tài), 整數(shù)型
.如果真 (鍵代碼 ＝ #Del鍵)
  任務(wù)超級(jí)列表框.刪除表項(xiàng) (任務(wù)超級(jí)列表框.現(xiàn)行選中項(xiàng))
.如果真結(jié)束

運(yùn)行結(jié)果：