Элементы языка VBA

Рис. 12.1 Расположенные объекты на форме

6. Активизируя на форме отдельно каждый объект, устанавливаем его свойство с помощью окна свойств (Properties рис. 12.2). Таким образом, интерфейс создан (рис. 12.3).

Рис. 12.3. Интерфейс проекта (с готовыми результатами работы).

Запись программы в окне Кода

Подробности составления программы будут известны позже по мере изложения материала по VBA. Отметим, что запуск программы будет происходить от щелчка кнопки Запуск. Поэтому дважды щелкнем по этой кнопке на форме. В результате выводится окно кода с двумя строками процедуры отклика, между которыми установлен курсор для набора программы (рис. 12.4). Между этими строками располагаем программу вычисления:

Dim V, r, h, s As Single ‘ Описание переменных

V = Val(TextBox1.Text) ‘ Присвоение V численного значения

r = (V / (2 * 3.14)) ^ (1 / 3) ‘ Вычисление r

h = V / (3.14 * r ^ 2) ‘ Вычисление h

s = 2 * 3.14 * r ^ 2 + 2 * 3.14 * r * h ‘ Вычисление S

TextBox2 = Format(r, "##0.###" & " м.") ‘ Вывод r в окно TextBox2

TextBox3 = Format(h, "##0.###" & " м.") ‘ Вывод h в окно TextBox3

TextBox4 = Format(s, "##0.###" & " м.куб") ‘ Вывод S в окно TextBox4

Сохранение нового проекта в рабочей книге

Выполнить команды File, Save. В открывшемся окне указать путь к папке, ввести имя файла книги (например, Лаб. 1) и щелкнуть кнопку сохранить. Если проект был записан раньше, то после его редакции просто выполнить команду Save.

Запуск проекта в VBA

1. Активизировать форму запускаемого проекта (или вывести окно кода).

2. Выполнить команды Run, а затемRun Sub/UserForm.

3. Выполняется компиляция проекта и его выполнение. При этом выводится работающая форма, в которой нужно с клавиатуры ввести значение объема и щелкнуть на форме кнопку Запуск. Произойдет выполнение программы с выводом результатов решения (см. рис. 12.3).

4. Закрыть проект, щелкнув кнопку Закрыть на форме.

Выход из режима VBA в Excel

Выполнить команды File (Файл), Close (закрыть).

Алфавит языка состоит из строчных и прописных латинских букв (26), букв кириллицы, десяти арабских цифр (0-9) и специальных знаков с которыми мы знакомы по клавиатуре.