Введение в информатику. Хамухин А.А. - 70 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

69
3. Найти командную кнопку (Command Button) на панели инструментов
(элементы управления) и добавить ее на лист. Если элементов управления нет на
панели – добавить их через меню Сервис – Настройка – Элементы управления. В
режиме конструктора (кнопка с изображением мастерка нажата) щелкнуть по
добавленной командной кнопке дважды и можно начинать набор программы.
Набранная программа будет всегда выполняться при щелчке по Вашей
командной кнопке, если режим конструктора выключен (кнопка с изображением
мастерка отжата). Надпись на Вашей кнопке изменить с помощью свойства Caption
Окна отладки, контрольного значения и локальных переменных, как и панели
инструментов, можно зафиксировать в окне редактора или переместить за его
пределы. Чтобы разблокировать окно, перетащите мышкой строку его заголовка.
Заблокированные окна масштабируют, перетаскивая их границы.
В VBA программы пишутся в виде процедур: начинаются со служебного слова
Sub() с обязательным списком параметров в круглых скобках, даже если он пустой,
и кончаются служебным словом End Sub. Кроме процедур, допускается
использование функций (Function), которые могут объединяться в модули
(Module), которые в свою очередь составляют проекты (VBAProject).
3.2.2. Область видимости подпрограмм и функций
У подпрограмм и функций два уровня видимости – модуля и проекта. По
умолчанию все подпрограммы доступны на уровне проекта, то есть их можно
вызывать из любого модуля проекта. При желании Вы можете объявлять такие
программы с ключевым словом Public:
Public Sub Pro1()
Dim Var1 As Integer
Var1 = 1
MsgBox AddOne(VaM)
End Sub
Public Function AddOne(ByRef Var1)
AddOne = Var1 + 1
Call Pro1
End Function
Подпрограмма Pro1 и функция AddOne доступны из всех модулей данного
проекта (книги Excel). Поскольку все программы по умолчанию доступны на уровне
проекта, слово Public используется в основном для того, чтобы яснее отделить их от
программ уровня модуля. Если Вы опустите слово Public, никаких изменений не
произойдет.
Чтобы перевести подпрограмму или функцию на уровень модуля, объявите ее с
ключевым словом Private. Помните, что такие программы не могут запускаться
сами по себе. Их можно только вызывать из других программ. Это иллюстрируется
следующим примером.
Sub Pro2()
Var1 = GetRand

Страницы