Лекция: Ход работы.
1. Загрузите Visual Basic одним из способов.
2. Задача программы: определение времени между пуском и остановом секундомера. Программа должна выводить текущее время включения секундомера, текущее время выключения и показания секундомера (время, прошедшее от пуска до останова секундомера), они и будут являться переменными, используемыми в программе. Значения переменных будем выводить в текстовых окнах. Назначим идентификаторы (имена) переменных и запишем их в таблицу 9.
Таблица 9
Идентификаторы переменных
| Переменная | Идентификатор | Тип |
| Текущее время включения секундомера | StartTime | Variant |
| Текущее время выключения секундомера | StopTime | Variant |
| Показания секундомера – время, прошедшее от включения до выключения секундомера | tTime | Variant |
3 Задание.
Определите свойства формы.
Для этого перейдите в окно Properties и установите следующие значения свойств формы:
· Caption (название формы в строке заголовка окна формы) – Секундомер;
· Name (имя формы, используемое в программных кодах при ссылке на форму) – Secundomer;
· BackColor (цвет фона окна) – выберите, используя палитру цветов;
· BorderStyle (тип границы) – выберите один из предлагаемых вариантов (0, 1, 2 или 3).
4. Сохраните результаты работы. Используя диалоговое окно, найдите свою папку, создайте в ней новую папку под именем «Лабораторная работа №2» и сохраните в ней файлы проекта и формы под каким-либо именем (имя набирайте латинскими буквами).
5. Поместите на форму два элемента управления – CommandButton (кнопка).
Щелкнув инструментом CommandButton (командная кнопка) в окне инструментария, переместите указатель мыши в пустое окно формы. Он превратится в перекрестие, показывая, что включен режим вычерчивания. Установите перекрестие в нужное место и нажмите левую кнопку мыши и, не отпуская ее, вычертите кнопку нужного размера, потом отпустите кнопку.
Другой способ создания командной кнопки – дважды щелкнуть левую кнопку мыши на инструменте CommandButton. В этом случае командная кнопка будет помещена в центре формы. После создания командных кнопок в окне инструментария активизируется инструмент Pointer (Указатель). Это значит, что можно редактировать форму, то есть перемещать объекты управления в нужное место, изменять их размеры. Сделайте кнопки одинаковыми.
6. Задайте свойства командных кнопок.
По умолчанию свойства Caption и Name кнопок имеют значения соответственно CommandButton1 и CommandButton2.
Название и имя каждой кнопки нужно изменить в соответствии с ее назначением. Нужный элемент выбирается либо щелчком на нем мышкой, либо в списке объектов окна свойств (Properties). Установите в окне свойств новые значения свойств кнопок (см. таблицу 10).
Таблица 10
Свойства элементов управления
| Элемент управления | Значение свойства: | |
| Caption | Name | |
| CommandButton1 | Старт | btnStart |
| CornmandButton2 | Стоп | btnStop |
К именам кнопок (идентификаторам), используемым в программных кодах, добавлена приставка btn, указывающая тип объекта. Это требуют правила «хорошего тона».
7. Поместите на форму три элемента управления TextBox (окно с текстом) для вывода в них следующей информации: текущего времени включения секундомера, текущего времени выключения секундомера и показаний секундомера. Порядок создания текстовых окон такой же, как и для командных кнопок. На рисунке 8 представлена форма до и после назначения свойств элементам управления
| а | б |
Рисунок 8 – Вид формы до (а) и после (б) назначения свойств элементам управления
8. Задайте свойства текстовых окон. Поскольку в текстовых окнах предполагается вывод информации, необходимо свойству Text, имеющему по умолчанию значение Text, присвоить значение «пустой строки» (удалить значение Text свойства Text в окне свойств). Присвойте свойству Name текстовых окон соответственно значения txtStart, txtStop и txtTime (приставка к имени txt говорит о том, что имя присвоено объекту TextBox). По желанию можно изменить также другие свойства текстовых окон, например фон окна, тип границ, размер, тип и цвет шрифта. Сохраните результаты работы в новой папке «Лабораторная работа №2».
Объявление переменных.
Так как в интерфейсе пользователя предусмотрено две командные кнопки, то приложение должно реагировать как минимум на два события, которые предполагают наличие двух процедур. Следовательно, к переменным StartTime, StopTime и fTime должен быть доступ из обеих процедур. Поэтому переменные являются модульными и должны быть объявлены в разделе общих объявлений – general.
Составление кода процедур обработки событий.
Работа секундомера предполагает наличие двух событий: нажатие кнопки Старт (запуск секундомера) и нажатие кнопки Стоп (выключение секундомера).
При нажатии кнопки Старт должен происходить запуск секундомера. Выделите кнопку Старт и дважды щелкните на ней левой кнопкой мыши, после чего на экране появится окно кода. Тот же результат можно получить, нажав кнопку View Code в окне Project. Программный код, введенный в этом окне, будет храниться в том же файле, что и экранные объекты формы. В поле Object в верхней левой части окна выводится имя (идентификатор) выбранного объекта– btnStart. В поле Procedure дается название редактируемой процедуры. По умолчанию предлагается процедура обработки события Click.
Вообще список процедур раскрывается и из него может быть выбрана другая процедура. Нас интересует процедура обработки события Click. В текстовом окне кода сразу выводятся два обязательных для любой процедуры оператора: оператор с именем процедуры Private Sub btnStart Click и оператор конца процедуры End Sub.