CLng 函数

返回表达式，此表达式已被转换为 Long 子类型的 Variant。

CLng(expression)

expression 参数是任意有效的表达式。

说明

通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结果应当被表达为特定的数据类型，而非默认的数据类型。例如，在出现货币运算、单精度或双精度算术运算的情况下，使用 CInt 或 CLng 函数强制进行整数运算。

CLng 函数用于进行从其他数据类型到 Long 子类型的的国际公认的格式转换。例如，对十进制分隔符和千位分隔符的识别取决于系统的区域设置。

如果 expression 取值不在 Long子类型的允许范围内，则会出现错误。

下面的示例利用 CLng 函数把值转换为 Long:

Dim MyVal1, MyVal2, MyLong1, MyLong2MyVal1 = 25427.45: MyVal2 = 25427.55       ‘ MyVal1, MyVal2 是双精度值。MyLong1 = CLng(MyVal1)          ‘ MyLong1 25427。MyLong2 = CLng(MyVal2)           ‘ MyLong2 包含 25428 。

注意  CLng 不同于 Fix 和 Int 函数删除小数部分， 而是采用四舍五入的方式。 当小数部分正好等于 0.5 时， CLng 函数总是将其四舍五入为最接近该数的偶数。如， 0.5 四舍五入为 0, 以及 1.5 四舍五入为 2 。

VBS教程：函数-CLng 函数

原文：http://www.jb51.net/article/4640.htm