Функции TypeName и VarType
Връща низ (TypeName) или числова стойност (VarType) с информация относно променлива.
Синтаксис:
TypeName (Variable) / VarType (Variable)
Връщана стойност:
String; Integer
Параметри:
Variable: променливата, чийто тип да бъде определен. Може да използвате следните стойности:
Ключова дума |
Наименувана константа |
VarType |
Тип на променливата |
Boolean |
|
11 |
булева |
Date |
V_DATE |
7 |
дата |
Currency |
V_CURRENCY |
6 |
валутна |
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, "Някои типове в LibreOffice Basic"
End Sub