按鍵精靈Android版做一個定時啟動功能

  • 2019 年 10 月 7 日
  • 筆記

這兩天好幾個人問怎麼給腳本加一個定時功能,也就是在固定時間執行指定的任務。

分析思路:

  1. 獲取系統的時分秒
  2. 比對系統是否和設定的時間一樣
  3. 每隔一秒鐘比對一次,循環比對,直到比對成功以後退出循環。

程式碼截圖(簡易版):

程式碼:

Dim 定時小時=9

Dim 定時分鐘=20

Dim h,m

do

    h =DateTime.Hour()

    m = DateTime.minute()

    TracePrint h,m

    If h = 定時小時 and m = 定時分鐘 Then 

        Exit Do

    End If

    Delay 1000

Loop

TracePrint "到時間了!"

第二種帶有倒計時功能的程式碼:

程式碼:

Dim ds=10

Dim df=53

Dim h,m,s,時,分,秒

do

    h =DateTime.Hour()

    m = DateTime.minute()

    s = DateTime.Second()

    If h = ds and m = df Then 

        Exit Do

    End If

    秒 = 60 – s

    If df – 1 < m Then 

        分 = 60 + df -1- m

        時=ds-1-h

    Else 

        分 = df-1 – m

        時=ds-h

    End If

    TracePrint 時,分,秒

    ShowMessage "距離開始還有"&時&"小時"&分&"分鐘"&秒&"秒"

    Delay 1000

Loop

TracePrint "到時間了!"