TypeName 函数; VarType 函数

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

语法:


TypeName (变量) / VarType (变量)

返回值:

字符串；整数

参数:

「Variable」:要确定类型的变量。可以使用以下值:

关键字	已命名常量	VarType	变量类型
Boolean		11	布尔变量
Byte		17	Byte variable
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,"Collabora Office Basic 中的一些类型"
End Sub