TypeName Function; VarType Function
λ³μμ λν μ 보λ₯Ό ν¬ν¨νλ λ¬Έμμ΄(TypeName) λλ μ«μ κ°(VarType)μ ꡬν©λλ€.
ꡬ문:
TypeName (Variable) / VarType (Variable)
λ°ν κ°:
String; Integer
λ§€κ° λ³μ:
Variable: μ νμ κ²°μ ν λ³μμ λλ€. λ€μ κ°μ μ¬μ©ν μ μμ΅λλ€.
ν€μλ |
Named constant |
VarType |
λ³μ μ ν |
Boolean |
|
11 |
Boolean λ³μ |
Date |
V_DATE |
7 |
Date λ³μ |
Currency |
V_CURRENCY |
6 |
Currency variable |
Double |
V_DOUBLE |
5 |
Double λΆλ μμμ λ³μ |
Integer |
V_INTEGER |
2 |
Integer λ³μ |
Long |
V_LONG |
3 |
Long integer λ³μ |
Object |
|
9 |
Object λ³μ |
Single |
V_SINGLE |
4 |
Single λΆλ μμμ λ³μ |
String |
V_STRING |
8 |
String λ³μ |
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,"Some types in LibreOffice Basic"
End Sub