主题：计划管理的首次执行

在计划管理中，代码的间隔时间设定为1小时，那么代码首次执行时间是在项目启动一小时后执行？还是项目启动后立即执行？

如果希望项目启动后先执行一次，然后按设定间隔执行，改如何操作？

如果希望某个代码一天只执行一次，不管当天项目重复启动多少次，代码只执行一次，是否可以实现？

蓝版，帮我做个实例吧，谢谢

Dim dr1 As DataRow
With DataTables("周期性任务登记记录")
    dr1 = .Find(" [_Locked]  Is Not Null", "代码执行时间 Desc")  '取最后执行时间
End With
If dr1("代码执行时间") <> Today Then '如果最后执行时间不是今天
    Dim r11 As Row = Tables("周期性任务登记记录").AddNew
    r11("代码执行时间") = Today 
End If

 

蓝版，哪里错了？

我要在整表中查找。

不设置条件，要在整表中查找最新代码执行时间列

Dim dr1 As DataRow
With DataTables("周期性任务登记记录")
dr1 = .Find("", "代码执行时间 Desc")
End With
Dim D As Date
For D = dr1("代码执行时间") To Date.Today() Step 1   如果最新代码执行时间是2024年7月19日，需要得到20日、21日、今天共三个变量，是不是写错了？
    代码
Next