Урок из серии: «Программирование на Visual Basic.NET для школьников»
Компонент Windows Forms Timer (Таймер) вызывает событие через определенные интервалы времени. Его можно использовать для контроля за временем (например, при выполнении тестовых заданий), для задержки появления объектов на экране, при управлении работой приложения и т.д.
Сегодня вы узнаете, как можно использовать элемент Timer (Таймер) для контроля за временем при выполнении компьютерных тестовых заданий.
Таймер в Visual Basic.NET относится к невидимым объектам, так как он виден только на этапе создания интерфейса. Поэтому его положение не играет никакой роли.
Длина интервала времени, через который компонент Timer вызывает событие, определяется свойством Interval. Когда компонент включен, событие Tick вызывается через каждый интервал. В этом месте следует добавить исполняемый код.
Основные свойства элемента управления Timer
| Свойство | Значение | Комментарии |
| Interval | (устанавливается пользователем) | Указывает время в миллисекундах, которое проходит между одним событием таймера и следующим событием : 0 (по умолчанию) — отключение таймера; 1000 — таймер подключается раз в секунду |
| Enabled | True/False | False — отключение таймера True (по умолчанию) — подключение таймера |
Основное событие таймера — Tick. Оно инициализируется системой, и частота появления события зависит от выставленного пользователем времени.
Проект «Время тестирования»
При выполнении компьютерных тестовых заданий вы наверняка столкнулись с ситуацией, когда ответ не был засчитан из-за превышения отпущенного на него времени. Требуется смоделировать подобную ситуацию при помощи таймера. Сообщение о правильности ответа и превышении времени должно выводиться в диалоговые окна MsgBox.
Технология выполнения
- Создайте интерфейс, содержащий элементы, видимые на рисунке.
- Нарисуйте в любом месте формы управляющий элемент Timer.
- В окне свойств для таймера установите для свойства Interval значение : 10 000 мс (10 с.) , для свойства Enabled значение : True (доступен).
- Напишите программный код в обработчике события Form1_Load:
‘ Сброс переключателей
RadioButton1.Checked = False
RadioButton2.Checked = False
RadioButton2.Checked = False - Напишите соответствующий код в обработчике события Timer1_Tick. Код этого обработчика будет выполняться с интервалом, указанным в свойстве Interval.
MsgBox("Лимит времени 10 секунд превышен", , "Контроль времени") Timer1.Enabled = False 'Таймер отключается Button1.Enabled = False 'Кнопка недоступна - Напишите код в обработчике события Button1_Click:
If RadioButton3.Checked Then MsgBox("Верно", , "Тест") Else MsgBox("Неверно", , "Тест") End If Timer1.Enabled = False 'Таймер отключается Button1.Enabled = False 'Кнопка недоступна - Запустите программу несколько раз, выбирая различные ответы и искусственно замедляя выбор.
- Сохраните форму и проект под имнем «Время тестирования».
До встречи на следующем уроке