IV этап – Запуск программы

Запуск программы может быть осуществлен следующим образом:

1 Выбрать команду из меню Run→Run Sub/UserForm. Программа Вычисление запустится в среде программирования VBA. На экране появится разработанный программный интерфейс.

2 В поле ввода числа 1, где мигающий курсор, ввести произвольное число (целое или с дробной частью).

3 Нажать клавишу Tab или щелкнуть мышью на поле ввода числа 2. Мигающий курсор появится в поле числа 2.

4 Ввести второе произвольное число в поле 2.

5 Аналогично ввести третье число в поле 3.

6 Щелкнуть на кнопке <Вычислить>. В поле результата будет показан окончательный результат вычисления выражения.

7 Для продолжения работы программы, то есть для вычисления выражения при других входных данных, надо щелкнуть мышью на поле ввода числа 1 и ввести его.

8 Выполнить действия п.3-7 и т.д. Работа программы в подобном режиме диалога будет продолжаться до тех пор, пока не будет произведен щелчок мыши по кнопке <End>. В этом случае программа завершит работу, и среда программирования VBA вновь появится на экране.

V этап

Сохранить созданную программу создания приложения

Пример 2. Расчет стоимости с учетом НДС.

Постановка задачи. Создать диалоговое окно, в котором производится расчет стоимости товара с учетом НДС по его стоимости без НДС и значению ставки НДС.

Технология выполнения задания:

1 В редакторе Visual Basic в проект добавьте форму. На ней расположить три надписи, три поля ввода и две командные кнопки, как показано на рисунке 33.

Рисунок 33 – Диалоговое окно «Расчет стоимости»

2 При помощи окна Properties задать элементам управления значения следующим образом, как показано в таблице 26.

Таблица 26

Элемент управления	Свойство	Значение
Форма	Caption	Расчет стоимости
Надпись	Caption	Стоимость без учета НДС
Поле ввода	Name	TextBox1
Надпись	Caption	НДС
Поле ввода	Name	TextBox2
Надпись	Caption	Стоимость с учетом НДС
Поле ввода	Name	TextBox3
Кнопка	Name Caption	CommandButton1 ОК
Кнопка	Name Caption	CommandButton2 Отмена

3 В модуле проекта набрать следующий код, изображенный на рисунке 34:

Рисунок 34 – Программный код

4 Запустить проект.

- нажать клавишу <F5>;

- в поле Стоимость без учета НДС ввести 1000;

- в поле НДС ввести 25;

- нажать кнопку ОК.

В поле Стоимость с учетом НДС будет выведена искомая стоимость. Для закрытия окна нажать кнопку Отмена.

Лабораторная работа № 8

Разработка пользовательского приложения с помощью объектов Форм

Цель: приобретение навыков разработки пользовательского приложения с помощью объектов Формы, вычисляющее значение выражения в заданных точках, вводимых с клавиатуры. Индивидуальные варианты лабораторной работы № 8 выполняются в соответствии с индивидуальными вариантами лабораторной работы № 1 (4 часа).