Дек
11th

Урок 17. Элемент управления Timer и вывод объектов на экран

Рубрика: Visual Basic.NET для школьников | Автор:admin

Урок из серии: “Программирование на Visual Basic для школьников”

На этом уроке вы узнаете еще об одном применении компонента  Windows Forms Timer (Таймер). Научитесь использовать Таймер  для задержки времени появления объектов на экране.

Очень часто требуется вывести информацию на экран не всю сразу, а порциями, через указанные промежутки времени.

На языке программирования Visual Basic.Net вы создадите проект, в котором на экран через определенный интервал времени будет выводиться текст.

Проект “Цвета радуги”

Требуется смоделировать подобную ситуацию, выводя на форму раз в секунду очередной надписи с ключевыми словами для запоминания основных цветов спектра. Слова должнвы быть записаны соответствующим цветом.

Технология выполнения

  1. Создайте новый проект. Назовите его: “Цвета радуги”
  2. На форме разместите  7 надписей и  кнопку как показано в образце.
    В окне свойств установите для надписей (Label) начальное значение свойства Text : “пусто”, текст надписей  будет выводиться во время выполнения приложения. Для кнопки  установите значение свойства Text:  “Начало” .
    Visual Basic.NET-Timer-Urok16-1
  3. Расположите в любом месте формы элемент управления Timer (Таймер).
  4. В окне свойств установите для таймера интервал 1000 мс (1с.), для формы установите размер шрифта (Font Size) равный 12.
  5. Во время загрузки формы обнуляется счетчик, отключается таймер.  Напишите программный код в обработчике события Form1_Load:
     i = 0 ' обнуление счетчика
     Timer1.Enabled = False 'таймер недоступен
  6. После щелчка на кнопке таймер запускается. Напишите код в обработчике события Button1_Click:
    ' таймер доступен
    Timer1.Enabled = True
  7. Напишите соответствующий код в обработчике события Timer1_Tick. Код этого обработчика будет выполняться с интервалом в 1 секунду.  Будет выводиться очередное слово соответствующим цветом. После 7-ой метки таймер блокируется.
     i = i + 1
     Select Case i
        Case 1
            Label1.ForeColor = System.Drawing.Color.Red
            Label1.Text = "Каждый "
        Case 2
            Label2.ForeColor = System.Drawing.Color.DarkOrange
            Label2.Text = "Охотник"
        Case 3
            Label3.ForeColor = System.Drawing.Color.Yellow
            Label3.Text = "Желает"
        Case 4
            Label4.ForeColor = System.Drawing.Color.Lime
            Label4.Text = "Знать"
        Case 5
            Label5.ForeColor = System.Drawing.Color.SkyBlue
            Label5.Text = "Где"
        Case 6
            Label6.ForeColor = System.Drawing.Color.Blue
            Label6.Text = "Сидят"
        Case 7
            Label7.ForeColor = System.Drawing.Color.BlueViolet
            Label7.Text = "Фазаны"
            Timer1.Enabled = False
     End Select
  8. Запустите программу. На форму с интервалом в секунду выведутся  ключевые слова для запоминания основных цветов спектра.
  9. Сохраните проект. До встречи на следующем уроке.

Поделиться с друзьями


Оставить комментарий или два