- •Свойства размещения и размера элемента:
- •Текстовое поле - TextBox
- •Кнопка Command Button. Свойства:
- •Понятие программного кода
- •Окно программного кода
- •Процедуры
- •Структура процедуры
- •Создание процедуры
- •Вызов процедур на исполнение
- •Практическое задание №1
- •Типы данных, которыми оперирует vba
- •Переменные
- •Объявление переменных
- •Массивы
- •Пользовательские типы данных
- •Операторы присваивания
- •Комментарии
- •Операции vba
- •Математические функции vba
- •Строковые функции
- •Функции даты и времени
- •Преобразование типов данных
- •Создание и применение процедур и функций.
- •Передача процедуре величин
- •Использование списка поименованных аргументов
- •Создание и применение функций
- •Операторы тела функции
- •Управление выполненем программы
- •Логические функции
- •If Выражение_1 Then
- •If Выражение_2 Then
- •If Выражение_3 Then
Передача процедуре величин
Аргументы в заголовке дают возможность определить имена и типы величин, которые должны быть переданы процедуре. Переменные, которые объявляются на уровне процедуры, считаются “частными” для данной процедуры и их значение не может быть прочитано или изменено вне тела процедуры. Исключением являются переменные, указанные в операторе объявления.
ПРИМЕР:
‘Вызывающая процедура
Public Sub Сводка()
Dim Result As Single Сложение 6, 12, Result
Еnd Sub
‘Вызываемая процедура
Private Sub Сложение(Val1 As Single, Val2 As Single, _
Rez As Single) Rez = Val1 + Val2 End Sub Вызывающую процедуру можно записать иначе, с использованием списка переменных Public Sub Сводка()
Dim ValA As Single, ValB As Single, Result As Single ValA = 6 ValB = 12 Сложение ValA, ValB, Result
Еnd Sub
Числовые значения переменных ValA, ValB передаются процедуре Сложение(), и только после ее завершения, переменной Result присваивается значение.
Использование списка поименованных аргументов
Использование списка поименованных аргументов облегчает ввод данных в процедурах с большим количеством аргументов. С этой целью, после имени переменной, которое указано в строке заголовка, нужно ввести знак присваивания (:= ) и значение, которое ей следует передать. Данный способ передачи данных позволяет изменять порядок следования аргументов, который может не соответствовать тому, что приведен в строке заголовка. Если использовать обычный знак равенства, то нарушение очередности становится невозможным.
ПРИМЕР: Сложение Val2:=ValB, Val1:=ValA, Rez:=Result
Создание и применение функций
Процедура создания функций немного отличается от процедуры создания подпрограмм, ее вид:
Тип Function Имя_Функции(Аргументы) As Тип_Данных s
Операторы тела функции
End Function
Так как функция возвращает результирующее значение в своем имени, следует указать к какому Типу_Данных VBA следует отнести эту величину.
Вызов функции, также отличается от вызова подпрограмм - она может вызываться как часть формулы.
ПРИМЕР:
Public Sub Сводка()
Dim ValA As Single, ValB As Single, Result As Single ValA = 6: ValB = 12 Result= Сложение(ValA, ValB)
Еnd Sub
Private Function Сложение(Val1 As Single, Val2 As Single) _ As Single
Сложение = Val1 + Val2
End Sub
Управление выполненем программы
Простейший оператор принятия решений If
Принцип управление выполнением программы или принцип принятия решений в ходе выполнения программы состоит в сравнении двух величин и изменения последовательности выполнения программы в соответствии с результатом этого сравнения. Комбинация нескольких операторов сравнения позволяет создавать сложные логические выражения, с помощью которых организуется разветвление расчетного алгоритма. Если в программе нет операторов принятия решений, то ее операторы выполняются один за другим. Таким образом организуются линейные алгоритмы. Когда в программе встречаются операторы принятия решений, последовательность выполнения программы нарушается - часть операторов может быть пропущена или выполнена несколько раз.
Простейшим оператором принятия решений является оператор If, который записывается в следующем виде
If Выражение Then Оператор
Выражение обычно представляет собой оператор логического сравнения двух величин или формулу, результат которой имеет логическое значение - True или False.
Оператор любой оператор VBA или имя процедуры, которую следует вызвать, если получен логический результат Выражения - True.
Оператор If действует следующим образом. Сначала If проверяет Выражение. Если его результат оказывается True, то выполняется Оператор. В противном случае, когда получен результат False, Оператор пропускается и осуществляется переход к следующему за Оператором действию по ходу выполнения программы.
Операторы логического сравнения
В VBA различаются следующие операторы логического сравнения:
Оператор |
Описание |
= |
Равно |
<> |
Не равно |
< |
Меньше |
> |
Больше |
<= |
Меньше или равно |
>= |
Больше или равно |
Is |
Идентично |
Like |
Сравнение строк с использованием подстановочных символов |