TypeName Function; VarType Function
Возвращает строку (TypeName) или числовое значение (VarType), которое содержит сведения о переменной.
Синтаксис
TypeName (Variable) / VarType (Variable)
Возвращаемое значение:
String; Integer
Параметры:
Переменная. Переменная, для которой необходимо определить тип. Возможны следующие значения:
Ключевое слово |
Named constant |
VarType |
Тип переменной |
Boolean |
|
11 |
Логическая переменная |
Date |
V_DATE |
7 |
Переменная типа Date |
Currency |
V_CURRENCY |
6 |
Currency variable |
Double |
V_DOUBLE |
5 |
Переменная с плавающей запятой с двойной точностью |
Integer |
V_INTEGER |
2 |
Целая переменная |
Long |
V_LONG |
3 |
Целая переменная типа Long |
Object |
|
9 |
Переменная типа Object |
Single |
V_SINGLE |
4 |
Переменная с плавающей запятой с обычной точностью |
String |
V_STRING |
8 |
Строковая переменная |
Variant |
|
12 |
Переменная типа Variant (может содержать все типы, указанные в определении) |
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