Таймер имеет погрешность

@Skorp24 · Регистрация: 15.06.2009

Студворк — интернет-сервис помощи студентам

Такая проблема, не знаю точно, из-за чего она и как её устранить. Подскажите, пожалуйста, кто-нибудь...

Например, на форме элементы Text1, Timer1 и Timer2. Оба таймера при запуске программы активны.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Form_Load()
Timer1.Interval = 50
Timer2.Interval = 5000
Text1.Text = 0
End Sub
 
Private Sub Timer1_Timer()
Text1.Text = Text1.Text + 1
End Sub
 
Private Sub Timer2_Timer()
Timer1.Enabled = False
Timer2.Enabled = False
MsgBox (Text1.Text * 50)
End Sub

В соответствии с кодом, через 5 секунд после запуска программы должно появляться сообщение со значением прошедшего времени. Оно должно быть равно 5000, но у меня оно равняется 4000, т.е. первый таймер почему-то опаздывает. Можно ли это исправить?

@Профессор · 08.11.2009, 01:07

Ну во первых всегда при работе с таймерами важно: сначала задать интервалы, а уже потом разрешить работу таймеров.

Добавлено через 10 минут
Я такую же программу сделал, у меня MsgBox показывает вообще 3950 (значение)

@Toxa33rus · 08.11.2009, 14:49

Да таймеры всегда грешили очень хорошо. Как делаешь где-то часы со стрелками, так если интервал задать 1 сек., то стрелка очень часто стоит 2 секунды а потом резко на 2 секунды проскакивает. Приходится делать 0.5 сек, но даже тогда это заметно. Открываем виндовые часы и наблюдаем за стрелками: 5 сек. щелкает ровно а на 6-й задержка где-то пол секунды.

@Skorp24 · 08.11.2009, 17:04 **[ТС]**

Интервалы я поставил в код, чтобы всем было понятно и коротко. А естественно, нет смысла их ставить в код, если можно поставить по умолчанию.

Вообще-то, я пробовал значение интервала ставить на 1000 и сверялся с аппаратным секундомером - всё выполнялось правильно. Но вот решил поставить интервал на "1" и через 5 секунд получалось, что он досчитал до числа меньшего, чем 400 мс. Это во время выполнения остальных функций программы. Ну ладно, думаю, процессор не справляется. Но не может же быть такого при 0,05 с...

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

@Профессор 7 / 7 / 0 Регистрация: 30.10.2009 Сообщений: 28
	08.11.2009, 01:07
	Ну во первых всегда при работе с таймерами важно: сначала задать интервалы, а уже потом разрешить работу таймеров. Добавлено через 10 минут Я такую же программу сделал, у меня MsgBox показывает вообще 3950 (значение) 0

@Toxa33rus 3924 / 925 / 125 Регистрация: 16.04.2009 Сообщений: 1,977
	08.11.2009, 14:49
	Да таймеры всегда грешили очень хорошо. Как делаешь где-то часы со стрелками, так если интервал задать 1 сек., то стрелка очень часто стоит 2 секунды а потом резко на 2 секунды проскакивает. Приходится делать 0.5 сек, но даже тогда это заметно. Открываем виндовые часы и наблюдаем за стрелками: 5 сек. щелкает ровно а на 6-й задержка где-то пол секунды. 1

@Skorp24 52 / 50 / 26 Регистрация: 15.06.2009 Сообщений: 390
	08.11.2009, 17:04 [ТС]
	Интервалы я поставил в код, чтобы всем было понятно и коротко. А естественно, нет смысла их ставить в код, если можно поставить по умолчанию. Вообще-то, я пробовал значение интервала ставить на 1000 и сверялся с аппаратным секундомером - всё выполнялось правильно. Но вот решил поставить интервал на "1" и через 5 секунд получалось, что он досчитал до числа меньшего, чем 400 мс. Это во время выполнения остальных функций программы. Ну ладно, думаю, процессор не справляется. Но не может же быть такого при 0,05 с... 0