В заголовке почти все сказано. Я использовал компоненты таймера, настроенные на полсекунды, и сравнивал таблицы подробностей тревоги, и мне было интересно, есть ли что-то лучшее, чего я просто не видел.
'' '
For Each r As DataRow In AlarmsFromDataBase.Rows
Dim CurrentTime As DateTime = New DateTime(DateTime.Now.Year, DateTime.Now.Month, DateTime.Now.Day, DateTime.Now.Hour, DateTime.Now.Minute, DateTime.Now.Second)
If (DateTime.Compare(r("DateTimeAlarms"), CurrentTime) = 0) And r("AlarmHandled") <> True Then
r("AlarmHandled") = True
MsgBox("match found")
End If
Next
'' '
Это работает, конечно, но есть ли более эффективный или элегантный способ сделать это?