Функция TypeName

Возвращает значение типа String, содержащее сведения о переменной.

Синтаксис

TypeName ( имя_переменной )

Обязательный аргумент имя_переменнойаргумент является значением Variant, содержащим любые переменные, за исключением переменных пользовательского типа.

Замечания

Функция TypeName возвращает одну из следующих строк:

Строка

Переменная

Тип объекта

Объект с указанным типом

Byte

Тип Byte (байтовое значение)

Integer

Integer

Long

Тип Long Integer (длинное целое)

Single

Тип Single (одинарной точности с плавающей запятой)

Double

Тип Double (двойной точности с плавающей запятой)

Currency

Тип Currency (денежный)

Decimal

Тип Decimal (десятичное значение)

Date

Тип Date (значение даты и времени)

String

Тип String (строковое значение)

логический

Тип Boolean (логическое значение)

Error

Значение ошибки

пусто

Не инициализировано

Null

Нет допустимых данных

Object

Объект

Unknown

Объект неизвестного типа

Nothing

Объектная переменная, не ссылающаяся ни на какой объект


Если имя_переменной — массив, функция возвращает одну из перечисленных выше строк (или значение типа Variant) с пустыми скобками в конце. Например, если имя_переменной является массивом целых чисел, функция TypeName возвращает строку "Integer()".

Пример

Примечание : В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В этом примере функция TypeName используется для получения сведений о переменной.

Dim NullVar, MyType, StrVar As String
Dim IntVar As Integer, CurVar As Currency
Dim ArrayVar (1 To 5) As Integer
NullVar = Null ' Assign Null value.
MyType = TypeName(StrVar) ' Returns "String".
MyType = TypeName(IntVar) ' Returns "Integer".
MyType = TypeName(CurVar) ' Returns "Currency".
MyType = TypeName(NullVar) ' Returns "Null".
MyType = TypeName(ArrayVar) ' Returns "Integer()".
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×