Область видимости переменных

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

В следующем примере создается переменная strName для хранения строковых данных (String).

Dim strName As String

Когда эта инструкция располагается в процедуре, переменная strName может использоваться только в данной процедуре. Если же такая инструкция находится в разделе описаний модуля, то переменная strName доступна для всех процедур данного модуля, но не может использоваться процедурами из других модулей проекта. В этом случае, чтобы сделать переменную, доступной для всех процедур проекта, перед ней надо поставить инструкцию Public.

Public strName As String

В языке VB можно неявно описать переменную, просто используя ее в инструкции присвоения. Все неявно описанные переменные имеют тип Variant. Переменные типа Variant более требовательны к ресурсам памяти, чем большинство других переменных. Явное описание всех переменных уменьшает вероятность конфликтов имен и ошибок, связанных с опечатками. Если неявные описания нежелательны, то всем процедурам в модуле должна предшествовать инструкция Option Explicit. Если модуль содержит инструкцию Option Explicit, при попытке использования неописанного или неверно введенного имени переменной возникает ошибка во время компиляции.

Пример использования видимости переменных:

Модуль Module1:

Option Explicit ' Требование объявления переменных

Public perem1 As Integer

Sub proc1()

Dim perem2 As Integer

perem1 = 12

perem2 = 5

MsgBox perem1 + perem2

proc2 ' Вызов процедуры proc2 из модуля Module2

End Sub

Модуль Module2:

Option Explicit

Dim str1 As String

Public Sub proc2()

str1 = "Сегодня "

MsgBox func1()

End Sub

Function func1() As String

Dim str2 As Variant

str2=Now()+perem1

func1 = str1 & str2

End Function

Запуск процедуры proc1 из модуля Module1:

Видимость (доступность), используемых в примере переменных:

	Процедура (функция)	proc1 (Module1)	proc2 (Module2)	func1 (Module2)
Переменная
perem1	+	+	+
perem2	+	–	–
str1	–	+	+
str2	–	–	+

 

Пример

Для условий лабораторной работы № 3 "Условные операторы":

Задание А:

Составить алгоритм и нарисовать блок-схему для вычисления функции

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

Задание Б:

Представить аналитическими выражениями функцию y = f(x), заданную графически.

Изобразить блок-схему и написать программу для расчета y = f(x) при различных значениях x.

… выполнить следующие требования:

1) Задание А оформить как процедуру VB, в которую передается для расчета значение аргумента функции.

2) Задание Б оформить как функцию VB, которая возвращает значение y = f(x) и в которую передается для расчета значение аргумента (x).

3) Создать глобальную переменную, в которую записывать результаты работы процедуры на основе Задания А (требование 1) и функции на основе Задания Б (требование 2).

4) Поместить процедуру (требование 1), функцию (требование 2) и глобальную переменную (требование 3) в отдельный модуль VB

5) В отдельном модуле VB (еще одном) создать процедуру, в которой выполняется вызов процедуры на основе задания А (требование 1), функции на основе Задания Б (требование 2) и глобальной переменной с результатами работы (требование 3)