Лекция: OperatorN

MyFunc =result – обязательный оператор (в теле функции её возвращаемое значение обязательно должно быть присвоено переменной с именем функции)

 

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

Вызов функции производится следующим образом:

 

1. без присваивания: MyFunc Param1, Param2, Param3 … ParamN

2. с присваиванием:x=MyFunc (Param1, Param2, Param3 … ParamN)

MyFunc — имя функции

Param1, Param2, Param3 … ParamN — фактические параметры.

 

Замечание: внутри тела процедуры или функции можно объявлять новые переменные при помощи ключевого слова Dim.

Пример использования функции в программе (без параметров):

Задача: вывести на экран значение выражения: (7+8)*100/5, используя функцию summa

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

Function summa

MsgBox ((7+8)*100/5)

End Function

summa

 

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

Пример: передача параметра по значению.

Задача: вывести на экран зарплату сотрудника с вычетом налога (13%) и без вычета.

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

option explicit

dim a

Function nalog( ByVal a) ‘параметр подлежит передаче по значению

a=a-(13*a)/100 ‘вычисление зарплаты с вычетом налога

MsgBox «Зарплата с вычетом налога:»&a

nalog=a

End Function

a=InputBox («Введите вашу зарплату без вычета налога: »,«Окно ввода: „)

nalog a ‘вызов функции nalog

 

MsgBox “Зарплата без вычета налога: „&a

еще рефераты
Еще работы по информатике