LibreOffice 24.8 Hjelp
Returnerer tekst eller en numerisk verdi som inneholder typeinformasjon for en variabel.
  TypeName (Varname As Variant) As String
  VarType (Varname As Variant) As Integer
En tekst for TypeName suffiksert med '()' for matriser.
Et heltall for VarType. Tallet 8192 legges til den returnerte verdien for matriser av typen VarType.
Varname: Variabelnavnet du vil bestemme typen av.
Følgende verdier returneres:
| TypeName | Navngitt | VarType | Variabeltyper | 
|---|---|---|---|
| …() | 8192 | Matrise av variabler | |
| Boolean | 11 | Boolske variabler | |
| Byte | 17 | Byte variabel | |
| Date | V_DATE | 7 | Dato variabel | 
| Currency | V_CURRENCY | 6 | Valuta-variabel | 
| Double | V_DOUBLE | 5 | Variabel med dobbel presisjon flyttall | 
| Error | 11 | Variabel for feiltype | |
| Integer | V_INTEGER | 2 | Heltall variabel | 
| Long | V_LONG | 3 | Long heltallsvariabel | 
| Object | 9 | Objekt-variabel | |
| Single | V_SINGLE | 4 | Enkelpresisjon flyttallvariabel | 
| String | V_STRING | 8 | Streng variabel | 
| Variant | 12 | Variant variabel (kan inneholde alle typer spesifisert av definisjonen) | |
| Empty | V_EMPTY | 0 | Uinitialisert Variant-variabel | 
| Null | V_NULL | 1 | Ingen gyldige data | 
  Sub TypeName_VarType_example
    Const __Object=9, __Error=10, __Boolean=11, __Variant=12, __Byte=17, _
      __Array = 8192, aText = "Lorem ipsum dolor sit amet, consectetur …"
    Dim int16 As Integer,  int32() As Long   ' V_INTEGER,  V_LONG
    Dim flt32!,            flt64() As Double ' V_SINGLE,   V_DOUBLE
    Dim curr@,             dat3 As Date      ' V_CURRENCY, V_DATE
    Dim strng() As String, objct() As Object ' V_STRING,   …
    Dim bool As Boolean,   unkwn(), byt3 As Byte ' …,      V_EMPTY, …
    Dim table(-3 To 5)
    MsgBox _
     TypeName(int16) &" "& Vartype(int16) &" "& V_INTEGER        &" "& Chr(13) &_
     TypeName(int32) &" "& Vartype(int32) &" "& V_LONG+__Array   &" "& Chr(13) &_
     TypeName(flt32) &" "& VarType(flt32) &" "& V_SINGLE         &" "& Chr(13) &_
     TypeName(flt64) &" "& VarType(flt64) &" "& V_DOUBLE+__Array &" "& Chr(13) &_
     TypeName(dat3)  &" "& VarType(dat3)  &" "& V_DATE           &" "& Chr(13) &_
     TypeName(curr)  &" "& VarType(curr)  &" "& V_CURRENCY       &" "& Chr(13) &_
     TypeName(atext) &" "& VarType(aText) &" "& V_STRING         &" "& Chr(13) &_
     TypeName(strng) &" "& VarType(strng) &" "& V_STRING+__Array &" "& Chr(13) &_
     TypeName(objct) &" "& VarType(objct) &" "& __Object+__Array &" "& Chr(13) &_
     TypeName(unkwn) &" "& VarType(unkwn) &" "& V_EMPTY          &" "& Chr(13) &_
     TypeName(bool)  &" "& VarType(bool)  &" "& __Boolean        &" "& Chr(13) &_
     TypeName(varnt) &" "& VarType(varnt) &" "& V_EMPTY          &" "& Chr(13) &_
     TypeName(table) &" "& VarType(table) &" "&__Variant+__Array &" "& Chr(13) &_
     TypeName(byt3)  &" "& VarType(byt3)  &" "& __Byte           _
     ,, "Datatyper i LibreOffice Basic"
    Msgbox "TypeName(table): "&TypeName(table) &Chr(13)& _
      "VarType(table)="&Vartype(table) _
      ,"Matrise med variantverdier"
  End Sub ' TypeName_VarType_example