VB表单计时器挂起

Question

我创建了一个VB形式的闹钟，我注意到如果我打开另一个类似Chrome浏览器的应用程序，计时器会挂起。如果它在55秒后挂起，然后在05秒重新开始，那么我的时钟将错过1分钟，因为只有当秒数达到00时，分钟才会改变。有什么想法吗？

Answer 1

出于问题的原因，你不应该检查第二个0。保留上次执行日期的变量。如果自上次执行日期起超过1分钟，请执行您的代码。

Dim previousExecution As DateTime
Dim closestExecution As DateTime

' ...

' Get current time minus seconds
closestExecution = DateTime.Now
closestExecution = closestExecution.AddSeconds(-closestExecution.Second)

If previousExecution < closestExecution Then
    ' Execute your code
    previousExecution = closestExecution
End If