目录
索引 🔎︎

# TypeName 函数; VarType 函数

返回含有变量信息的字符串 (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,"$[officename] Basic 中的一些类型"
    End Sub