TypeName funktsioon; VarType funktsioon

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

Byte

17

Byte variable

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


Veakoodid:

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 LibreOffice BASICus"
End Sub

Palun toeta meid!