Contents
Index 🔎︎

# TypeName Function; VarType Function

Tagastab muutuja teavet sisaldava stringi (TypeName) või arvväärtuse (VarType).

## Süntaks:

    TypeName (Variable) / VarType (Variable)

## Tagastusväärtus:

String; Integer

## Parameetrid:

Variable: muutuja, mille tüüpi soovid määratleda. Kasutada võib järgmisi väärtusi:

võtmesõna | Named constant | VarType | Muutujate tüübid
Boolean |  | 11 | Loogiline muutuja
Date | V_DATE | 7 | Kuupäevamuutuja
Currency | V_CURRENCY | 6 | Currency variable
Double | V_DOUBLE | 5 | Topelt ujukomamuutuja
Integer | V_INTEGER | 2 | Täisarvmuutuja
Long | V_LONG | 3 | Pikk täisarvmuutuja
Object |  | 9 | Objekt-muutuja
Single | V_SINGLE | 4 | Üksik ujukomamuutuja
String | V_STRING | 8 | String-muutuja
Variant |  | 12 | Variandi muutuja (võib sisaldada kõiki definitsioonis määratud tüüpe)
Empty | V_EMPTY | 0 | Muutuja pole algväärtustatud
Null | V_NULL | 1 | Kehtivaid andmeid pole

## Error codes:

5 Vigane protseduuri väljakutse

## Näide:

    Sub ExampleType
    Dim iVar As Integer
    Dim sVar As String
    Dim siVar As Single
    Dim dVar As Double
    Dim bVar As Boolean
    Dim lVar As Long
    Dim cVar as Currency
    Dim tVar as Date
     MsgBox TypeName(iVar) & " " & VarType(iVar) & Chr(13) &_
     TypeName(sVar) & " " & VarType(sVar) & Chr(13) &_
     TypeName(siVar) & " " & VarType(siVar) & Chr(13) &_
     TypeName(dVar) & " " & VarType(dVar) & Chr(13) &_
     TypeName(bVar) & " " & VarType(bVar) & Chr(13) &_
     TypeName(cVar) & " " & VarType(cVar) & Chr(13) &_
     TypeName(tVar) & " " & VarType(tVar) & Chr(13) &_
     TypeName(lVar) & " " & VarType(lVar),0,"Mõned tüübid $[officename] BASICus"
    End Sub