Процедури типів Function і Sub

Функції створюються тоді, коли деякі дії потрібно виконувати кілька разів у програмі. Для створення власної процедури типу Function необхідно використати такі оператори:

Function <ім'я функціі> ([аргументи функції}) [As <тип>]

оператори функції

End Function

Тут:

• ім'я функції —значення, яке повертається у процедуру виклику після виконання процедури;

• аргументи — імена змінних, значення яких використовуються функцією;

• тип — це тип значень, які повертає функція.

Для активізації цієї процедури треба ввести до програми ім'я процедури з тією кількі-

стю аргументів, які використовувалися при її оголошенні.

Наприклад, процедура Di розраховує довжину діагоналі прямокутника при відомих сторонах a та b:

Function Di(a,b) As Double

Di = Sqr(a*a+b*b) End Function

Після створення такої функції у програмі досить лише її активізувати з відомими ар-

гументами. Наприклад: Di(3, 4).

Процедура типу Sub, на відміну від процедури типу Function, після її виконання по- вертає значення (декілька значень) в аргументи процедури або виконує певні дії (напри- клад, друкування інформації)..

Для створення такої процедури використовують оператор:

Sub <ім'я> ([аргументи]) [As <тип>]

оператори процедури

End Sub

Тут:

• ім'я — це ім'я процедури, що створюється:

• аргументи —імена змінних, значення яких використовуються функцією і повер-

таються у процедуру виклику;

• тип —це тип значень, які повертає функція.

Процедура, що виконує друкування значень в VB, має вигляд: Sub PR(X,Y)

Printer.FontName = "Times New Roman" ' установлення шрифту. Printer.FontSize = 12 ' установлення розміру шрифту

Print.Text X;Y End Sub

Статичні процедури використовуються для збереження значень змінних процедури Sub у разі її повторного виклику. Для створення таких процедур застосовується оператор:

Sub <ім'я процедури> Static <аргументи> [<тип>]

оператори процедури

End Sub

Щоб припинити роботу процедури, використовується оператор - Exit Sub.

Лекція 9. Комп’ютерні мережі та їх можливості у реалізації сучасних інформаційних технологій.

Дата добавления: 2014-01-07