ВУЗ:
Составители:
65
Соответствующая ей запись в форме фрагмента программы на VBA:
Z = (A Or Not B) Xor (c And d)
Или, тот же самый фрагмент можно записать более наглядно с помощью услов-
ного оператора If:
If (A = True Or Not B = True) Xor (C = True And D = True) Then Z = True
2.8. Процедуры и функции VBA
Программы можно записывать в форме процедур (подпрограмм): которые на-
чинаются со служебного слова Sub() с обязательным списком параметров, даже ес-
ли он пустой и кончаются служебным словом End Sub. Кроме процедур допускает-
ся использование функций (служебные слова начала Function и конца End Func-
tion). Для досрочного выхода из процедур и функций используются служебные сло-
ва Exit Sub и Exit Function.
2.8.1. Отличия функций от подпрограмм
Функции и подпрограммы имеют три основных отличия:
• Функция начинается ключевым словом Function и заканчивается ключевыми
словами End Function.
• Функцию можно вызывать из формулы, введенной в ячейку или из правой
части арифметического выражения.
• Функция может возвращать значение в вызывающую программу или в фор-
мулу.
Рассмотрим пример функции Multiply, вычисляющей произведение двух чисел
(рис. 2.12).
Sub Pro17()
Dim Var1 As Single
Dim Var2 As Single
Dim Var3 As Single
Var1 = 0.034 ‘Массовая доля метана в нефти
Var2 = 1000 ‘Масса пластовой нефти, кг
Var3 = Multiply(Var1, Var2)
MsgBox “Масса метана в пластовой нефти = “ & Var3 & “ кг”
End Sub
Function Multiply(ByVal Var1, ByVal Var2)
Multiply = Var1 * Var2
End Function
Страницы
- « первая
- ‹ предыдущая
- …
- 64
- 65
- 66
- 67
- 68
- …
- следующая ›
- последняя »
