Връща цяло число, което показва подтипа на променлива.

Синтаксис

VarType ( променлива )

Изискванатааргумент на променлива е вариант, съдържащ произволна променлива, с изключение на променливата на дефиниран от потребителя тип.

Връщащи се стойности

Константа

Стойност

Описание

vbEmpty

0

Празен (неинициализирана)

vbNull

1

NULL (без валидни данни)

vbInteger

2

Цяло число

vbLong

3

Дълго цяло число

vbSingle

4

Число с плаваща запетая с единична точност

vbDouble

5

Двойно по-прецизно число с плаваща запетая

vbCurrency

6

Парична стойност

vbDate

7

Стойност на дата

vbString

8

String

vbObject

9

Object

vbError

10

Стойност за грешка

vbBoolean

11

Булева стойност

vbVariant

12

Variant (използва се само с масиви от варианти)

vbDataObject

13

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

vbDecimal

14

Десетично число

vbByte

17

Стойност за байтове

vbUserDefinedType

36

Опции, които съдържат дефинирани от потребителя типове

vbArray

8192

"масив"


Забележка: Тези константи се задават от Visual Basic for Applications. Имената могат да бъдат използвани навсякъде във вашия код вместо действителните стойности.

Забележки

Функцията VarType никога не връща стойността за vbArray само по себе си. Винаги е добавен към друга стойност за указване на масив от определен тип. Константата vbVariant се връща само заедно с vbArray , за да покаже, че аргументът за функцията VarType е масив от тип Variant. Например върнатата стойност за масив от цели числа се изчислява като vbInteger + vbArrayили 8194. Ако даден обект има свойство по подразбиране, VarType(обект) Връща типа на свойството по подразбиране на обекта.

Пример

Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример използва функцията VarType , за да определи подтипа на променлива.

Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.

Нуждаете се от още помощ?

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към Microsoft приобщени

Беше ли полезна тази информация?

Доколко сте доволни от качеството на превода?
Какво е повлияло на вашия потребителски опит?

Благодарим ви за обратната връзка!

×