2.3.3 Эффективное использование типов данных

Если обратное не указано, неописанные переменные приобретают тип данных Variant . Этот тип данных упрощает написание программ, но его использование не всегда является наиболее эффективным.

Следует предусмотреть применение других типов данных, если:

· Программа имеет большой размер и очень много переменных.

· Требуется как можно более быстрое выполнение программы.

· Выполняется прямая запись данных в файлы с произвольным доступом.

Для описания переменной определенного типа используется инструкция Dim:

Dim X As Integer

Эта инструкция описывает переменную X как Integer — целые числа от -32768 и до 32767. При попытке присвоить X число, выходящее за пределы этого диапазона, возникает ошибка. При присваивании X дробного числа, выполняется округление. Например:

X = 32768 ' Вызывает ошибку.

X = 5.9 ' Задает для x значение 6.

Тип данных Variant

Тип данных Variant является типом, к которому относятся все переменные, не описанные явно с другим типом данных (с помощью инструкций Dim, Private, Public или Static). Для типа Variant не определен символ описания типа. Variant является особым типом данных. Переменные этого типа могут содержать любые данные, за исключением строк (тип String) фиксированной длины и определяемых пользователем типов. Переменная типа Variant может также содержать специальные значения Empty, Error, Nothing и Null. Указать характер подтипов типа Variant позволяют функции VarType или TypeName.

Допустимыми числовыми данными являются любые целые или действительные числа в диапазоне от -1,797693134862315E308 до -4,94066E-324 для отрицательных значений и от 4,94066E-324 до 1,797693134862315E308 для положительных значений.

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

Dim MyVar As Variant

MyVar = 98052

В этом примере переменная MyVar содержит представление числового значения 98052.

Значение Empty определяет переменную типа Variant, которая не была инициализирована (не получила начальное значение). Переменная типа Variant, содержащая значение Empty, рассматривается как 0 в контексте математических операций и как пустая строка ("") в контексте операций со строковыми значениями.

Не следует путать значения Empty и Null. Null указывает, что переменная типа Variant имеет пустое значение в результате конкретных операций.

Для типа Variant значение Error является специальным значением, которое используется для указания возникновения условия ошибки в процедуре.

2.3.4 Описание констант

Для описания константы и определения ее значения используется инструкция Const. После описания константу нельзя модифицировать и нельзя присваивать ей новое значение.

Константа описывается в процедуре или в начале модуля, в разделе описаний. Константы уровня модуля по умолчанию являются личными. При описании общих констант уровня модуля инструкции Const должно предшествовать ключевое слово Public. Для явного описания личных констант перед инструкцией Const надо поставить ключевое слово Private.

В следующем примере константа Public conAge описывается как Integer, и ей присваивается значение 34.

Public Const conAge As Integer = 34

Константы могут быть описаны одним из следующих типов данных: Boolean, Byte, Integer, Long, Currency, Single, Double, Date, String, или Variant. Поскольку значение константы уже известно, можно задать тип данных в инструкции Const.

Допускается также описание нескольких констант в одной строке. В этом случае, чтобы задать тип данных, надо указать определенный тип для каждой константы. В примере константы conAge и conWage описываются как Integer.

Const conAge As Integer = 34, conWage As Currency = 35000