Возвращает объект 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()".
