Файл: Макарова_Информатика_2000.doc

Переменные на уровне модуля, var1 – в модуле 1 и var3 – в модуле 2, используются во всех вложенных в модуль процедурах. Переменная var1 предопределена в процедуре 1, но сохраняет свое значение в процедуре 2; переменная var3 предопределена в процедуре 3.

Переменные в модуле объявляются с помощью операторов различных типов:

локальные переменные

Dim <var> As <type>, <var> As <type>, <var> As <type>, ....

глобальные переменные

Public <var> As <type>, <var> As <type>, <var> As <type>, ....

где <var> – имя переменной;

<type> – встроенный тип данных переменной.

Массивы переменных

Массивы переменных имеют произвольную размерность – одномерные, двухмерные, трехмерные и т.п. объявляются следующими операторами:

локальный массив

Dim <Arr> (размерность) As <type>

глобальный массив

Public <Arr> (размерность) As <type>

где <Arr> – имя массива,

(размерность) – размерность массива.

Пример 19.13.

Пользовательские типы данных

Оператор Туре позволяет на уровне модуля определить пользовательскую структуру данных, включающую другие разнородные, логически связанные переменные, например:

[Private | Public] Type <typename>

< elementname1> As <type>

< elementname2> As <type>

...

End Type

где <typename> – имя пользовательского типа данных;

< elementname> – имя составляющей структуры.

В модуле с помощью операторов Dim или Public необходимо объявить переменную, использующую пользовательский тип данных. Как правило, это массивы.

Пример 19.14.

Type Student

FullName As String *20

Group As Single

BirthDay As Date

Hight As Integer ...

End Type

Dim Student_Card (1 To 1000) As Student

Тип Student служит для объявления массива Student_Card размерностью 1000 элементов, структура записи включает: фамилию, имя, номер учебной группы, дату рождения, рост.

Объявление констант

Константа – величина, сохраняющая постоянное значение во время выполнения программы, но изменяемая по желанию пользователя.

Константы объявляют с помощью оператора:

Const <const> = <значение>

где <const> – имя константы;

<значение> – значение константы.

Для констант существует понятие сфера действия:

глобальные константы имеют ключевое слово Public:

Public Const Datel=#12.12.96#

локальные константы:

Const Date2=# 12.12.97#

Локальные константы объявляются в пределах процедуры или модуля, глобальные константы – на уровне внешнего модуля и доступны для всех вложенных модулей и процедур.

VBA имеет встроенные константы, которые применяют без специального объявления и начинаются с символов vb. Excel 5.0 использует встроенные константы, начинающиеся символами xl.

ОПЕРАТОРЫ ЯЗЫКА VBA

Оператор присваивания

Данный тип оператора служит для присвоения начальных значений, записи результата вычисления в переменную, изменения значений.

Оператор присваивания имеет следующую структуру построения:

где <var> – имя переменной;

<formula> – формула.

Переменная слева от знака "=" может быть простой переменной, элементом массива или свойством объекта. Формула состоит из переменных, констант, операций и функций.

Пример 19.15.

Place="d:\windows\system"

File="GameTree.Exe"

Student_Card( 100).Group= 133

С помощью оператора присваивания сохраняются результаты вычислений по формуле в памяти машины – под именем переменной.

VBA использует различные операции для построения выражений, проверки условий. Операции имеют определенный приоритет (старшинство) выполнения (табл. 19.5).

Таблица 19.5. Основные операции языка VBA

Приоритеты перечислены в порядке убывания (чем больше номер, тем меньше приоритет операции). Для изменения естественного порядка выполнения операций используются круглые скобки.

Пример 19.16.

Disct=(S – P)/(dt)^2

Сначала вычисляется разность S – Р, затем произведение dt возводится в степень 2, после этого вычисляется частное от деления; результат присваивается переменной Disct.

Оператор комментариев

Комментарий – это пояснение к программе. Любой комментарий начинается в строке с произвольного места программы символом '. Комментарии предназначены для сопровождения и поддержки программ. Как правило, разработка и сопровождение программ осуществляются различными специалистами. Текст комментариев должен обеспечить понимание логики программы, отражать ее специфику.

Пример 19.17.

Текст программы	Комментарий
Option Explicit	Обязательность объявления всех переменных в модуле перед их использованием
Sub случ_числа()	Процедура генерации случайных чисел в выделенной области электронной таблицы Excel 5.0
Dim numrows As Integer; numcols As Integer Dim therow As Integer; thecol As Integer numrows = Selection.Rows.Count numcols = Selection.Columns.Count Randomize	Объявление переменных Присвоение значения числа строк и столбцов в выделенной области электронной таблицы Запуск генератора случайных чисел
For therow = 1 To numrows For thecol = 1 To numcols Selection.Cells(therow; thecol).Value = Rnd	Организация цикла типа Fоr-Next, внешний цикл Внутренний цикл Присваивание текущей ячейке случайного числа Selection – выбор ячейки Cells – метод доступа к ячейке с определенными координатами Value – свойство "значение"
Next thecol	Конец внутреннего цикла
Next therow	Конец внешнего цикла
End Sub	Конец процедуры

Процедуры

Программные модули VBA состоят из процедур (одной или более).

Процедура – минимальный модуль в составе прикладной программы на языке VBA.

Процедуры имеют стандартное оформление:

Sub <имя_процедуры> (аргументы)

..................................

тело процедуры (операторы)

..................................

End Sub

Оператор Sub - объявление процедуры, задается имя, указывается состав аргументов, передаваемых при вызове процедуры из программы. Каждому оператору Sub обязательно соответствует End Sub.

Тело процедуры – набор последовательно выполняемых операторов на языке VBA.

В программе можно не только использовать процедуры данного программного модуля, но и ссылаться на процедуры других модулей текущей рабочей книги, а также процедуры других рабочих книг. Для этого необходимо задать ссылки; при нахождении на рабочем листе модуля выполняется команда СЕРВИС, Ссылки. В диалоговом окне «Ссылки» (рис. 19.22) показан список доступных ссылок на библиотеки или другие рабочие книги.

Рис. 19.22. Диалоговое окно для подключения программных модулей и их процедур

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

Различают 4 типа процедур:

процедуры общего назначения (стандартные), как правило, не вносят изменений вне себя;

командные процедуры расширяют возможности прикладных программ, реализуя новые виды обработки;

процедуры обработки событий выполняются при наступлении событий определенного вида (например, открытие или закрытие электронной таблицы Excel, нажатие кнопки, перемещение объекта и т.п.);

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

Существует несколько вариантов вызова процедур (все необходимые ссылки на соответствующие процедуры заранее устанавливают).

1. Из другой процедуры того же модуля вызов осуществляется по имени процедуры

2. Из другой процедуры другого (подключенного) модуля вызов осуществляется по имени модуля, имени процедуры (в пределах одного приложения)

3. Из другого приложения (другой рабочей книги ППП Excel 5.0) – вызов осуществляется по имени модуля, имени процедуры и имени рабочей книги

Примечание. Если в нескольких рабочих книгах имеется ряд процедур с определенным именем, следует указать имя файла рабочей книги и имя модуля в этой книге при вызове процедуры.

Чтобы предотвратить доступ к процедуре из других модулей, процедуру делают частной. Для этого в операторе процедуры следует указать:

Для защиты модуля рабочей книги от доступа к нему из процедур другой рабочей книги в начале модуля указывают: Option Private Module

Если в момент вызова процедуре передаются какие-то величины либо значения при ее выполнении, определяют список аргументов, который содержит данные обмена с вызывающей процедурой.

В теле процедуры могут быть объявлены внутренние переменные, которые не являются предметом обмена с вызывающей процедурой, такие переменные не могут изменяться вне пределов вызываемой процедуры.

Объявление аргументов в заголовке процедуры имеет стандартный вид:

Sub Proc_B (Val1 As Single; Val2 As Date;... )

Через выбранный разделитель списков (в зависимости от настройки Windows – запятая или точка с запятой) следуют аргументы с указанием имени и типа значения.

Если аргумент необязательный, т.е. может не задаваться при вызове процедуры, указывается ключевое слово Optional.

Пример 19.18. Процедура вычисления площади прямоугольника по двум сторонам

Текст программы

Комментарий

Sub SquarPr (L As Single; H As Single;

S As Single; Optional F)

If IsMissing (F) Then F=100

S=L*H

End Sub

Объявление процедуры SquarPr и ее аргументов

Встроенная функция VBA – IsMissing проверяет наличие аргумента F, если F не задано, по умолчанию F присваивается значение 100 (F имеет тип Variant)

Вычисление площади прямоугольника Конец процедуры