TypeName Function; VarType Function
αααα‘ααβααααβα’ααααβαα½α (TypeName) α¬βαααααβααΆβααα (VarType) αααβααΆαβααααααΆαβαααααΆααβα’αααβαα½αΒ α
ααΆαααβααααααα α
TypeName (Variable) / VarType (Variable)
αααααβαααα‘αα α
ααααβα’αααα α ααα½αβααα
αααΆαααΆαααααα α
Variable α α’αααβαααβα’αααβα ααβαααααβααααααΒ α α’αααβα’αΆα βααααΎβαααααβααΌα βααΆαβααααα α
|
ααΆαααβαααααΉα |
Named constant |
VarType |
ααααααβα’ααα |
|
Boolean |
|
11 |
α’αααβαααΌααΈα |
|
Date |
V_DATE |
7 |
α’αααβααΆαβααα·α αααα |
|
Currency |
V_CURRENCY |
6 |
Currency variable |
|
Double |
V_DOUBLE |
5 |
α’αααβααααΆαβαααα |
|
Integer |
V_INTEGER |
2 |
α’αααβα ααα½αβααα |
|
Long |
V_LONG |
3 |
α’αααβα ααα½αβαααβαα |
|
Object |
|
9 |
α’αααβααααα» |
|
Single |
V_SINGLE |
4 |
α’αααβααααΆαβααβαα½α |
|
String |
V_STRING |
8 |
α’αααβααααβα’αααα |
|
Variant |
|
12 |
α’αααβαααΆααααα (α’αΆα βααΆαβααααααβααΆααα’αα αααβααΆαβαααααΆααββαααβααΆαβαααααβ) |
|
Empty |
V_EMPTY |
0 |
α’αααβαα·αβααααΌαβααΆαβαααααβαααααβα αΆααααααΎα |
|
Null |
V_NULL |
1 |
ααααΆαβαα·ααααααβααααΉαααααΌα |
α§ααΆα ααα α
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,"Some types in LibreOffice Basic"
End Sub