Função TypeName Function; VarType
Retorna uma string (TypeName) ou um valor numérico (VarType) que contém informação para uma variável.
Sintaxe:
TypeName (Variável) / VarType (Variável)
Valor de retorno:
String; Integer
Parâmetros:
Variable: a variável cujo tipo você deseja determinar. Pode-se usar os seguintes valores:
palavra-chave |
Constante nomeada |
VarType |
Tipo de variável |
Boolean |
|
11 |
Variável lógica |
Date |
V_DATE |
7 |
Variável Date |
Currency |
V_CURRENCY |
6 |
Variável tipo Currency |
Double |
V_DOUBLE |
5 |
Variável Double de ponto flutuante |
Integer |
V_INTEGER |
2 |
Variável Integer |
Long |
V_LONG |
3 |
Variável inteiro Long |
Object |
|
9 |
Variável Object |
Single |
V_SINGLE |
4 |
Variável Single de ponto flutuante |
String |
V_STRING |
8 |
Variável String |
Variant |
|
12 |
Variável Variant (pode conter todos os tipos especificados pela definição) |
Empty |
V_EMPTY |
0 |
Variável não 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