诚心请教2 ，急

Question

Visual Basic 语言参考   CType 函数请参见
类型转换函数
返回表达式显式地转换为指定数据类型、对象、结构、类或接口后的结果。CType(expression, typename)
各部分说明
expression 
任何有效的表达式。如果 expression 的值超出了 typename 所允许的范围，将会出现错误。 
typename 
任何在 Dim 语句的 AS 子句内合法的表达式，即任何数据类型、对象、结构、类或接口的名称。 
备注
CType 采用内联方式编译，即转换代码是计算表达式的代码的一部分。因为不需要调用完成转换的过程，因此执行速度更快。示例
本示例使用 CType 函数将表达式转换为指定的数据类型。Dim MyNumber As Long
Dim MyNewType As Single
MyNumber = 1000
MyNewType = CType(MyNumber,Single)   ' MyNewType is set to 1000.0.
请参见
类型转换函数