Какво е функция?
Функцията е парче код, което изпълнява конкретна задача и връща резултат. Функциите се използват най-вече за извършване на повтарящи се задачи като форматиране на данни за изход, извършване на изчисления и т.н.
Да предположим, че разработвате програма, която изчислява лихва върху заем. Можете да създадете функция, която приема сумата на заема и периода на изплащане. След това функцията може да използва сумата на заема и периода на изплащане, за да изчисли лихвата и да върне стойността.
Защо да използвам функции
Предимствата от използването на функции са същите като тези в горния раздел за това защо да се използват подпрограми.
Правила за именуване на функции
Правилата за именуване функционират същите като тези в горния раздел за правила за именуване на подпрограми.
VBA Синтаксис за деклариране на функция
Private Function myFunction (ByVal arg1 As Integer, ByVal arg2 As Integer)myFunction = arg1 + arg2End Function
ТУК в синтаксиса,
Код | Действие |
---|---|
|
|
|
|
|
|
|
|
Функция, демонстрирана с пример:
Функциите са много подобни на подпрограмата. Основната разлика между подпрограма и функция е, че функцията връща стойност, когато е извикана. Докато подпрограмата не връща стойност, когато е извикана. Да предположим, че искате да добавите две числа. Можете да създадете функция, която приема две числа и връща сумата от числата.
- Създайте потребителския интерфейс
- Добавете функцията
- Напишете код за командния бутон
- Тествайте кода
Стъпка 1) Потребителски интерфейс
Добавете команден бутон към работния лист, както е показано по-долу
Задайте следните свойства на CommanButton1 на следните.
S / N | Контрол | Имот | Стойност |
---|---|---|---|
1 | CommandButton1 | Име | btnAddNumbers |
2 | Надпис | Функция за добавяне на числа |
Вашият интерфейс сега трябва да се появи, както следва
Стъпка 2) Функционален код.
- Натиснете Alt + F11, за да отворите прозореца с код
- Добавете следния код
Private Function addNumbers(ByVal firstNumber As Integer, ByVal secondNumber As Integer)addNumbers = firstNumber + secondNumberEnd Function
ТУК в кода,
Код | Действие |
---|---|
|
|
|
|
|
|
Стъпка 3) Напишете код, който извиква функцията
- Щракнете с десния бутон върху командния бутон btnAddNumbers_Click
- Изберете Преглед на кода
- Добавете следния код
Private Sub btnAddNumbersFunction_Click()MsgBox addNumbers(2, 3)End Sub
ТУК в кода,
Код | Действие |
---|---|
"MsgBox addNumbers (2,3)" |
|
Стъпка 4) Стартирайте програмата, ще получите следните резултати
Изтеглете Excel, съдържащ горния код
Изтеглете горния код на Excel
Резюме:
- Функцията е парче код, което изпълнява определена задача. Функция връща стойност след изпълнение.
- Както подпрограмите, така и функциите предлагат повторна употреба на кода
- Както подпрограмите, така и функциите спомагат за разбиването на големи парчета код в малки управляеми кодове.