LibreOfficeDev 25.8 Help
zkF9a‖Returns text or a numeric value that contain type information for a variable.
  TypeName (Varname As Variant) As String
  VarType (Varname As Variant) As Integer
9pCYi‖A text for TypeName suffixed with '()' for arrays.
2XLBM‖An integer for VarType. The number 8192 is added to the returned value for arrays of type VarType.
CDZok‖ Varname: The variable name that you want to determine the type of.
KwGDm‖The following values are returned:
| poMCX‖TypeName | AqZZY‖Named | VarType | ZyZMD‖Variable type | 
|---|---|---|---|
| …() | 8192 | wRiCY‖Array of variables | |
| Boolean | 11 | 9oyzE‖Boolean variable | |
| Byte | 17 | D3K3Z‖Byte variable | |
| Date | V_DATE | 7 | dQbgL‖Date variable | 
| Currency | V_CURRENCY | 6 | gmBRv‖Currency variable | 
| Double | V_DOUBLE | 5 | 44XVW‖Double-precision floating-point variable | 
| Error | 11 | LLtX4‖Error type variable | |
| Integer | V_INTEGER | 2 | nZq5t‖Integer variable | 
| Long | V_LONG | 3 | 2ACjE‖Long integer variable | 
| Object | 9 | TAHDS‖Object variable | |
| Single | V_SINGLE | 4 | vvV5T‖Single-precision floating-point variable | 
| String | V_STRING | 8 | fXQwQ‖String variable | 
| Variant | 12 | LEs6v‖Variant variable (can contain all types specified by the definition) | |
| Empty | V_EMPTY | 0 | QkEij‖Uninitialized Variant variable | 
| Null | V_NULL | 1 | CLAF9‖No valid 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           _
yEErg‖     ,, "Data types in LibreOfficeDev Basic"
    Msgbox "TypeName(table): "&TypeName(table) &Chr(13)& _
      "VarType(table)="&Vartype(table) _
  RejQG‖    ,,"Array of Variant values"
  End Sub ' TypeName_VarType_example