Основы Visual Basic школьникам

Сетевые уроки преподавателя МОУ "Куракинская СОШ" Шакурова З. З.

Ссылки

Тема19=======Событийные и общие процедуры=======

Процедуры Sub -не возвращают значение в вызывающую процедуру.

Процедуры (подпрограммы) - это логически построенные, небольшие программные блоки, на которые делится вся программа.

Если процедура может выполнятся только внутри данного программного блока (например, только в этой ФОРМЕ), и её нельзя вызвать из другого программного блока, то такая процедура является локальной.

Локальная процедура задается с помощью ключевого слова Private Sub

Если процедуру можно вызвать из других программных блоков (например из другой ФОРМЫ), то такая процедура является глобальной.

Глобальная процедура задается с помощью ключевого слова Public Sub.

По умолчанию, если перед ключевым словом Sub, отсутствует ключевое слово, то эта глобальная процедура.

Процедуры бывают: СОБЫТИЙНЫЕ и ОБЩИЕ.

Событийная процедура - подпрограмма, которая начинает выполняться после достижения какого то события (например, при щелчке по кнопке появляется картина).

Событийная процедура всегда связана с каким то ОБЪЕКТОМ.

Чтобы вызвать событийную процедуру ОБЪЕКТА, достаточно по этому ОБЪЕКТУ сделать двойной левый щелчок.

Событийные процедуры бывают и локальные, и глобальные.

Каждая событийная процедура имеет вид:

Локальная

Глобальная

Private Sub ОБЪЕКТ1_СОБЫТИЕ ()

ОБЪЕКТ2. Свойство = ЗначениеСвойства

ОБЪЕКТ3. Метод арг1:=знач, арг2:=знач

и т.д.

End Sub

Public Sub ОБЪЕКТ1_СОБЫТИЕ ()

ОБЪЕКТ2. Свойство = ЗначениеСвойства

ОБЪЕКТ3. Метод арг1:=знач, арг2:=знач

и т.д.

End Sub

Общая процедура - представляет собой подпрограмму, которая начинает выполняться после её вызова из другой процедуры.

Если в программе во всех ФОРМАХ встречается один и тот же программный блок, то его можно записать только один раз и в одном месте, в виде глобальной общей программы.

Запуск общей программы не связана с ОБЪЕКТОМ и с СОБЫТИЕМ, а происходит, когда к нему обращаются из других программных блоков.

Вызов общей процедуры из той же ФОРМЫ: Call ИмяПроцедуры (СписокПараметров)

Вызов общей процедуры из другой ФОРМЫ: Call ОБЪЕКТ. ИмяПроцедуры (СписокПараметров)

Можно просто без оператора Call.

Общая процедура бывает и локальной Private и глобальной Public

Локальная

Глобальная

Private Sub Имя Процедуры (Список Параметров

программный код (операторы)

End Sub

Public Sub Имя Процедуры (Список Параметров)

программный код (операторы)

End Sub

Пример использования событийной и общей подпрограммы в одной программе.

Private Sub Command1 Click()

E = (Val (Text1.Text) * (Val (Text2.Text) ^ 2)) / 2 Then

X = «Ваш ответ верный E=m*v^2/2»

Call сравнение (E, X)

End Sub
------------------

Примечание: Call сравнение (E, X) - обращается в глобальную общую процедуру, которая дана ниже.

Public Sub сравнение (E, X)

If E = 0 Then

Text4.Text "Ваш ответ не верный, возможно, не все данные ввели"

ElseIf E = Val (Text3.Text) Then

Text4.Text = X

Else

Text4.Text = «Ваш ответ неверный. Чтобы вернуться к теории щелкни по кнопке ТЕОРИЯ»

End If

End Sub

ПРИМЕР ПРОГРАММЫ 20 КБ.

Есть ещё процедуры Function, которые возвращают значение в вызывающую процедуру.

Локальная

Глобальная

Private Function Имя Процедуры (аргументы)

программный код (операторы)

End Function

Public Function Имя Процедуры (аргументы)

программный код (операторы)

End Function

ВВЕРХ

========================

Мой сайт

Программы по физике

Задания по физике и математике

Оглавление

Ссылки

About uCoz web-service

Community

Contacts

Legal information

Основы Visual Basic школьникам

Сетевые уроки преподавателя МОУ "Куракинская СОШ" Шакурова З. З.