Module
Contents
Index 🔎︎

# TypeName Function; VarType Function

返回含有变量信息的字符串 (TypeName) 或数值 (VarType)。

## 语法：

    TypeName (变量) / VarType (变量)

## 返回值：

字符串；整数

## 参数：

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 | 无有效数据

## 错误代码：

5 无效的过程调用

## 示例：

    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