Реферат по предмету "Информатика, программирование"


Для чего нужна процедура Function?

Итак, функция. Что это такое? Функция выполняет служебное действие, например вычисление, и возвращает значение. Вызвать функцию можно, написав её имя и передав ей аргументы, в нужном месте вашей программы. Чем же полезна функция? Сейчас объясню на очень простом примере! Например, Вы пишите простенькую программу, которая вычисляет среднее арифметическое трёх чисел, потом умножает полученный результат на каждое число и отнимает их сумму. Неважно зачем вам такая программа, это ведь пример ;-). Вот она (пишем в модуле):


Sub Main()


Dim a As Integer объявляем переменную для первого числа


Dim b As Integer объявляем переменную для второго числа


Dim c As Integer объявляем переменную для третьего числа


a = InputBox("Введите первое число") получаем первое число


b = InputBox("Введите второе число") получаем второе число


c = InputBox("Введите третье число") получаем третье число


проделываем нужную операцию над числами


выводим результат на экран


MsgBox (((((a + b + c) / 3) * a) * b) * c) - (a + b +c)


End Sub


Вроде бы всё нормально. А теперь представте себе, что программа начала ширится и формулой приходится пользоваться из разных мест программы и Вы должны поэтому её кругом писать 8:-O !!!


Да, некрасиво получается... Для этого можно воспользоваться функцией, которая будет иметь эту формулу и только ждать своего вызова и ваших чисел ;-)! Напишем такую функцию и назовём её, например FuncX (вне пределов подпрограммы Sub): объявляем функцию и задаём передаваемые аргументы


Public Function FuncX(a, b, c) As Integer присваевает себе значение формулы


FuncX = (((((a + b + c) / 3) * a) * b) * c) - (a + b + c)


End Function


Есть! А теперь Вы можете вызывать функцию из любого места вашей программы, написав её имя и передав три числа a, b и с:


FuncX (a, b, c) или FuncX(4, 5, 6)


и не надо больше этой длинной формулы! Вместо


(((((a + b + c) / 3) * a) * b) * c) - (a + b +c)


Теперь можно писать


FuncX(a, b, c)


Неправда это удобней? Надеюсь я обьяснил понятно ;)?


Примечание: передаваемые значения функции изменяются! Напрмер:


Function ABC (X,Y)


ABC = (2 * X) + (2 * Y)


End Function


Теперь X равно 2 * Х, а Y равно 2 * Y, т.е. их значения удвоились. Для того чтобы переданные значения не изменялись то в скобках нужно писать перед аргументом ByVal. Например:


Function ABC ( ByVal X, ByVal Y)


Сами того не подозревая, мы очень часто используем функции. Например InputBox. Смотрите:


A = InputBox (Prompt, Title)


А - это результат, возвращаемый функцией. InputBox - это имя функции. Prompt и Title - передаваемые значения. Но функция это стандартна.



Не сдавайте скачаную работу преподавателю!
Данный реферат Вы можете использовать для подготовки курсовых проектов.

Поделись с друзьями, за репост + 100 мильонов к студенческой карме :

Пишем реферат самостоятельно:
! Как писать рефераты
Практические рекомендации по написанию студенческих рефератов.
! План реферата Краткий список разделов, отражающий структура и порядок работы над будующим рефератом.
! Введение реферата Вводная часть работы, в которой отражается цель и обозначается список задач.
! Заключение реферата В заключении подводятся итоги, описывается была ли достигнута поставленная цель, каковы результаты.
! Оформление рефератов Методические рекомендации по грамотному оформлению работы по ГОСТ.

Читайте также:
Виды рефератов Какими бывают рефераты по своему назначению и структуре.

Сейчас смотрят :

Реферат Віра, Надія, Любов у філософсько-релігійних поглядах та етичній думці людства
Реферат Этикет в деловой карьере
Реферат Программа преддипломной практики для студентов всех форм обучения специальности «Финансы и кредит»
Реферат Туберкулез классификация, клиническая картина. Вакцина БЦЖ, значение реакции Манту
Реферат 2. Осмотр гинекологических больных при помощи зеркал
Реферат Международный опыт и перспективы развития ипотечного кредитования
Реферат НОВГОРОДСКИЕ БЕРЕСТЯНЫЕ ГРАМОТЫ 2
Реферат Прокуратура и адвокатура в зарубежных странах
Реферат Злочинна недбалість, як вид необережності
Реферат Олимпийские игры. Практика- комплекс упражнений при плоскостопии
Реферат Учетная политика предприятия и оптимизация налоговых платежей
Реферат Спартанская и афинская системы воспитания
Реферат Передаточная функция дискретной системы
Реферат Правила признания товарного знака общеизвестным в Российской Федерации
Реферат Гроші та розвиток ринкової економіки в Україні