TypeName 函数(VBA)
(2017-04-03 19:48:56)分类: ◆VBA |
TypeName 函数(VBA)
━━━━━━━━━━━━━━━━━━━━━━━━━
返回一个String,提供有关变量的信息。
语法
TypeName(varname)
必要的varname 参数是一个 Variant,它包含用户定义类型变量之外的任何变量。
说明
TypeName 所返回的字符串可以是下面列举的任何一个字符串:
返回字符串变量
对象类型类型为 objecttype 的对象
Byte 位值
Integer 整数
Long 长整数
Single 单精度浮点数
Double 双精度浮点数
Currency货币
Decimal十进制值
Date 日期
String 字符串
BooleanBoolean 值
Error 错误值
Empty 未初始化
Null 无效数据
Object对象
Unknown类型未知的对象
Nothing 不再引用对象的对象变量
如果varname 是一个数组,则返回的字符串可以是任何一个后面添加了空括号的可能的返回字符串(或 Variant)。例如,如果 varname 是一个整数数组,则 TypeName 返回 "Integer()"。
TypeName 函数示例
本示例使用TypeName 函数返回有关变量的信息。
'声明变量。
Dim NullVar, MyType, StrVar As String, IntVar As Integer, CurVar As Currency
Dim ArrayVar (1 To 5) As Integer
NullVar= Null ' 设置变量值为 Null。
MyType = TypeName(StrVar) ' 返回 "String "。
MyType = TypeName(IntVar) ' 返回 "Integer "。
MyType = TypeName(CurVar) ' 返回 "Currency "。
MyType = TypeName(NullVar) ' 返回 "Null "。
MyType = TypeName(ArrayVar) ' 返回 "Integer() "。
━━━━━━━━━━━━━━━━━━━━━━━━━
返回一个
语法
TypeName(varname)
必要的
说明
TypeName
返回字符串
对象类型
Byte
Integer
Long
Single
Double
Currency
Decimal
Date
String
Boolean
Error
Empty
Null
Object
Unknown
Nothing
如果
TypeName
本示例使用
'
Dim
NullVar