参考代码
For Each dt As DataTable In DataTables If dt.name = "表A" Then If dt.HasChanges Then MyTimers("计划1").Interval = 180000 '设置为3分钟后提示 vars("state") = 1 Return End If End IfNext