Funkcija VarType

Atgriež veselu skaitli, kas norāda mainīgais apakštipu.

Sintakse

VarType ( varname )

Obligāts varnamearguments ir variants, kurā ir jebkurš mainīgais, izņemot lietotāja definēta tipa mainīgo.

Atgriežamās vērtības

Konstante

Vērtība

Apraksts

vbEmpty

0

Tukšs (Neinicializēts)

vbNull

1

Null (bez derīgiem datiem)

vbInteger

2

Vesels skaitlis

vbLong

3

Garš vesels skaitlis

vbSingle

4

Vienas precizitātes peldošā komata skaitlis

vbDouble

5

Dubultas precizitātes peldošā komata skaitlis

vbCurrency

6

Valūtas vērtība

vbDate

7

Datuma vērtība

vbString

8

Virkne

vbObject

9

Object

vbError

10

Kļūdas vērtība

vbBoolean

11

Būla vērtība

vbVariant tiek atgriezta

12

Variant (lietots tikai ar variantu masīviem)

vbDataObject

13

Datu piekļuves objekts

vbDecimal

14

Decimālā vērtība

vbByte

17

Baitu vērtība

vbUserDefinedType

36

Varianti, kas satur lietotāja definētus tipus

vbArray

8192

Masīvs


Piezīme.: Šīs konstantes ir norādītas programmā Visual Basic for Applications. Nosaukumus var lietot jebkur kodā reālo vērtību vietā.

Piezīmes

Funkcija VarType nekad neatgriež vērtību, kas attiecas uz vbArray . To vienmēr pievieno kādai citai vērtībai, lai norādītu noteikta tipa masīvu. Konstantes vbVariant tiek atgriezta tiek atgriezta tikai kopā ar vbArray , lai norādītu, ka argumenta VarType funkcija vērtība ir tipa variants. Piemēram, veselu skaitļu masīvam atgrieztā vērtība tiek aprēķināta kā vbInteger + vbArrayvai 8194. Ja objektam ir noklusējuma rekvizīts, VarType(objekts) atgriež objekta noklusējuma rekvizīta tipu.

Piemērs

Piezīme.: Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā tiek izmantota funkcija VarType , lai noteiktu mainīgā apakštipu.

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.

Vai nepieciešama papildu palīdzība?

Paplašiniet savas Office prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka jums varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta speciālistiem.

×