Função TypeName; Função VarType
Devolve uma cadeia (TypeName) ou um valor numérico (VarType) que contenha informações para uma variável.
Sintaxe:
TypeName (Variável) / VarType (Variável)
Valor de retorno:
Cadeia; Número inteiro
Parâmetros:
Variável: a variável cujo tipo pretende determinar. Pode utilizar estes valores:
palavra-chave |
Constante com nome |
VarType |
Tipo de variável |
Boolean |
|
11 |
Variável booleana |
Date |
V_DATE |
7 |
Variável de data |
Currency |
V_CURRENCY |
6 |
Variável monetária |
Double |
V_DOUBLE |
5 |
Variável de dupla vírgula flutuante |
Integer |
V_INTEGER |
2 |
Variável de números inteiros |
Long |
V_LONG |
3 |
Variável de números inteiros longos |
Object |
|
9 |
Variável de objeto |
Single |
V_SINGLE |
4 |
Variável com uma vírgula flutuante |
String |
V_STRING |
8 |
Variável de cadeia |
Variant |
|
12 |
Variável Variante (pode conter todos os tipos especificados pela definição) |
Empty |
V_EMPTY |
0 |
A variável não está inicializada |
Null |
V_NULL |
1 |
Sem dados válidos |
Exemplo:
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,"Alguns tipos no LibreOffice Basic"
End Sub