Funkcija VarType

Primjenjuje se na
Access za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vraća cijeli broj koji označava podvrstu varijable.

Sintaksa

VarType(naziv_var)

Obavezni argument naziv_varje Variant koji sadrži bilo koju varijablu osim varijable korisnički definiranog tipa.

Vraćene vrijednosti

Konstanta Vrijednost Opis
vbEmpty 0 Prazno (neinicijalizirano)
vbNull 1 Null (nema valjanih podataka)
vbInteger 2 Cijeli broj
vbLong 3 Dugi cijeli broj
vbSingle 4 Broj s pomičnim zarezom jednostruke preciznosti
vbDouble 5 Broj s pomičnim zarezom dvostruke preciznosti
vbCurrency 6 Vrijednost valute
vbDate 7 Vrijednost datuma
vbString 8 String
vbObject 9 Object
vbError 10 Pogreška
vbBooleova vrijednost 11 Booleova vrijednost
vbVariant 12 Variant (koristi se samo s nizovima varijanti)
vbDataObject 13 Objekt za pristup podacima
vbDecimal 14 Decimalna vrijednost
vbByte 17 Vrijednost bajta
vbUserDefinedType 36 Varijante koje sadrže korisnički definirane vrste
vbArray 8192 Polje

    

Napomena

Te konstante navodi Visual Basic for Applications. Nazivi se mogu koristiti bilo gdje u kodu umjesto stvarnih vrijednosti.

Napomene

Funkcija VarType nikad sama po sebi ne vraća vrijednost za polje . Uvijek se dodaje nekoj drugoj vrijednosti radi označavanja polja određene vrste. Konstanta vbVariant vraća se samo zajedno s funkcijom vbArray da bi se naznačilo da je argument funkcije VarType polje vrste Variant. Vrijednost vraćena za polje cijelih brojeva, na primjer, izračunava se kao vbInteger + ,vbArray, ili 8194. Ako objekt ima zadano svojstvo, VarType(objekt) vraća vrstu zadanog svojstva objekta.

Primjer

Napomena

Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom primjeru funkcija VarType određuje podvrstu varijable.

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.