Visual Basic 6
Функциональные процедуры
Поиск…
Вступление
Функция представляет собой ряд операторов, заключенных в выражения «Функция» и «Конечная функция».
Функция выполняет действие и возвращает управление вызывающему. Когда он возвращает управление, он также возвращает значение вызывающему коду.
Вы можете определить функцию в классе, структуре и модуле. По умолчанию оно открыто. Это означает, что вы можете вызывать его из любого места приложения, имеющего доступ к классу, структуре или модулю, в котором вы его определили.
Синтаксис
- [Модификаторы] Функция Name_Of_The_Function [(Arg_List)] Как Return_Type
- [Заявления]
- Конечная функция
замечания
- В этом примере используются два модификатора функций: Public & Private. Эти модификаторы определяют область действия функции.
- Функции с частной областью можно вызывать только из исходного файла, из которого они были определены. В нашем случае его можно вызвать с помощью модуля. И не может вызываться за пределами модуля.
- Функции с общедоступной областью можно вызывать как снаружи, так и внутри модуля. Просто мы можем сказать: «Мы можем назвать это где угодно в программе».
- Модификатор по умолчанию функции является общедоступным.
- По умолчанию аргументы функции передаются по ссылке (в отдельной теме это будет подробно объяснено).
Создание и вызов функции
Этот пример использует стандартный проект EXE с добавлением файла модуля.
- Создайте новый проект «Стандартный EXE». Таким образом, форма будет добавлена в проект по умолчанию.
- Добавить файл модуля в проект
- Поместите кнопку команды в форму
- Создать командную кнопку Нажмите «Событие».
Код модуля
Создал две функции в модуле. Одна из них - публичная функция (FnAdd). Он принимает два аргумента Integer val_1 & val_2. Он возвращает целое число. Эта функция добавляет два аргумента и возвращает значение вызывающему. Перед добавлением два аргумента проходят процесс в другой функции. Это частная функция. Характеристика / Правила публичной и частной функции, описанные в разделе «Примечания».
Public Function FnAdd(val_1 As Integer, val_2 As Integer) As Integer
'Calling private function
val_1 = FnMultiplyBy5(val_1)
'Calling private function
val_2 = FnMultiplyBy5(val_2)
'Function return statement
FnAdd = val_1 + val_2
End Function
Ниже приведена Частная функция модуля. Он принимает один целочисленный аргумент val. Он возвращает целое число. Эта функция умножает значение 5 на аргумент и возвращает результат вызывающему.
Private Function FnMultiplyBy5(Val As Integer) As Integer
'Function return statement
FnMultiplyBy5 = Val * 5
End Function
Код формы
В командной строке нажмите «Событие». Здесь мы вызываем функцию Public Public «FnAdd»,
Private Sub Command1_Click()
Debug.Print FnAdd(3, 7)
End Sub
Результат в окне Immediate
50