Присвоение

Константы

Тип данных, определенный пользователем (записи)

[Private | Public] Type varname ИмяЭлемента [([Индексы])] Аs type

…

End Type

Пример

Type MyType

MyName As String

MyBirthDate As Date

MySex As Integer

End Type

Type можно использовать только на уровне модуля. Для описания переменной определяемого пользователем типа используются инструкции Dim, Private, Public, ReDim или Static. В стандартных модулях типы данных, определяемые пользователем, по умолчанию являются общими. Видимость этих типов данных может быть изменена с помощью ключевого слова Public.

[ Public | Private ] Const ConstName [ As type] = expression

Public — ключевое слово, используемое на уровне модуля для описания констант, доступных всем процедурам во всех модулях. Не допускается в процедурах.

Private — ключевое слово, используемое на уровне модуля для описания констант, доступных только внутри модуля, в котором выполняется описание. Не допускается в процедурах.

type — Byte, Boolean, Integer, Long, Currency, Single, Double, Date, string или variant.

expression — литерал, другая константа или любое сочетание, которое включает все арифметические или логические операторы.

Присвоение значения переменной

varname = statement,

где statement — это вычислимое выражение: константа; выражение из констант, переменных, вызовов функций и операций.

set objectvarname = {[New] objectstatement | Nothing}

objectvarname — объектная переменная.

New — создать новый экземпляр класса (новый объект). Не допускается использование ключевого слова New для создания зависимых объектов.

objectstatement — выражение, состоящее из имени объекта, другой описанной переменной того же типа или функции, которая возвращает объект того же типа.

Nothing — Разрывает связь объектной переменной с каким-либо определенным объектом. При этом объектная переменная получает значение Nothing, освобождающее все системные ресурсы и ресурсы памяти, выделенные для объекта, на который имелась ссылка, если никакие другие переменные также не содержат не него ссылок.

Объектная переменная должна иметь тип, соответствующий объекту, который будет ей присвоен.

Инструкции Dim, Private, Public, ReDim, Static описывают только переменную, которая ссылается на объект. Ссылка на реальный объект не возникает до присвоения определённого объекта в инструкции set.

Пример. Допустим, есть класс Form1

Dim myForms(1 to 2) As Form1

Set myForms(1) = New Form1

Set myForms(2) = New Form1

В Dim myForms(1 to 2) As Form1 — определён массив ссылок на объекты типа Form1.

В Set myForms(1) = New Form1 — выполняется создание объекта типа Form1 и присвоение ссылки на него первому элементу массива.

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