Applies ToAccess pre Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vráti celé číslo určujúce podtyp premennej.

Syntax

VarType ( názovpremennej )

Povinný argument názovpremennejargument je variant obsahujúci akúkoľvek premennú okrem používateľom definovaného typu premennej.

Vrátené hodnoty

Konštanta

Hodnota

Popis

vbEmpty

0

prázdny (neinicializovaný)

vbNull

1

Null (žiadne platné údaje)

vbInteger

2

Integer

vbLong

3

Číslo typu Long Integer

vbSingle

4

Číslo s pohyblivou desatinnou čiarkou s jednoduchou presnosťou

vbDouble

5

Číslo s pohyblivou desatinnou čiarkou s dvojitou presnosťou

vbCurrency

6

Hodnota meny

vbDate

7

Hodnota dátumu

vbString

8

Reťazec

vbObject

9

Objekt

vbError

10

Chybová hodnota

vbBoolean

11

Hodnota typu Boolean

vbVariant

12

Variant (používa sa iba s poľami variantov)

vbDataObject

13

Objekt prístupu k údajom

vbDecimal

14

Hodnota desatinného čísla

vbByte

17

Bajtová hodnota

vbUserDefinedType

36

Varianty, ktoré obsahujú používateľom definované typy

vbArray

8192

Pole

Poznámka: Tieto konštanty sú zadané v jazyku Visual Basic for Applications. Názvy možno použiť kdekoľvek v kóde namiesto skutočných hodnôt.

Poznámky

Funkcia VarType nikdy nevráti hodnotu vbArray samostatne. Vždy sa pridá k inej hodnote na označenie poľa určitého typu. Konštanta vbVariant sa vráti len v spojení s vbArray, čo znamená, že argument pre funkciu VarType je pole typu Variant. Napríklad hodnota, ktorá sa vráti pre pole celých čísel, sa vypočítava ako vbInteger + vbArray alebo 8194. Ak má objekt predvolenú vlastnosť, funkcia VarType(objekt) vráti typ predvolenej vlastnosti objektu.

Príklad

Poznámka: Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.

V tomto príklade je funkcia VarType použitá na určenie podtypu premennej.

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

Potrebujete ďalšiu pomoc?

Chcete ďalšie možnosti?

Môžete preskúmať výhody predplatného, prehľadávať školiace kurzy, naučiť sa zabezpečiť svoje zariadenie a ešte oveľa viac.

Komunity pomôžu s kladením otázok a odpovedaním na ne, s poskytovaním pripomienok a so získavaním informácií od odborníkov s bohatými znalosťami.