Паритет потока от таймера

[wanes101]

Здравствуйте
Я обычно использую в качестве потоков обработчики таймеров, и мне нужно осуществить в таком потоке вечный цикл по отношению существования программы.
Вот его код на vb.net:

While Not ((Now.Day = NextMasurement.Day) And (Now.Month = NextMasurement.Month) _
And (Now.Year = NextMasurement.Year) And (Now.Hour = NextMasurement.Hour) _
And (Now.Minute = NextMasurement.Minute) And (Now.Second = NextMasurement.Second))
If TimeRunThread = -1 Then Exit Sub
End While

Таймер вызывает только один раз этот callback, но при его работе почему то процессор загружается на 50% не пойму причин для этого.
Now - структура с системным временем
NextMasurement - структура
Он мне нужен только для проверки условия NextMasurement =Now

[Selestis]

Любой вечный цикл будет целиком грузить то ядро, на котором выполняется. Это нормально, ведь там непрерывно выполняются инструкции (даже если в теле цикла ничего не делается). Если у вас двухъядерный процессор (а так видимо и есть), то будет загружено 50% - одно ядро.
Проблему можно решить, поставив например Thread.Sleep(1) после каждой итерации - это разгрузит поток. Ну или другое время укажите, в миллисекундах.

[wanes101]

Как минимум каждая windows программа должна иметь один вечный цикл, к примеру допустим
while GetMessage(Msg,0,0,0)
TranslateMessage(Msg)
DispatchMessage(Msg)
end while

Это пример WinMAin процедуры любого WindowsForm приложения, и значит там тоже используется Sleep?

За решение проблемы спасибо

[Selestis]

Так как GetMessage блокирует выполнение вашего кода до следующего windows сообщения, то логично предположить, что внутри оно делает почти то же самое)