CLng

将表达式强制转换为 Long。

语法：CLng( expression )

expression

必需 范围在 -2,147,483,648 到 2,147,483,647 之间的任何有效字符串或数值表达式。小数部分会四舍五入。

返回类型为 Long。如果 expression 超出 Long 的范围，将发生运行时错误。

当小数部分恰好为 0.5 时，CLng 始终舍入到最接近的偶数。例如，0.5 舍入为 0，1.5 舍入为 2。CLng 与 Fix 和 Int 函数不同，后者截断而非舍入数字的小数部分。

示例

此示例使用 CLng 函数将值转换为 Long。

Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55     ' MyVal1, MyVal2 are Doubles.
MyLong1 = CLng(MyVal1)                   ' MyLong1 contains 25427.
MyLong2 = CLng(MyVal2)                   ' MyLong2 contains 25428.

另请参阅

• CBool、CByte、CInt、CLngLng、CLngPtr、CSng、CStr、CVar 函数
• Fix、Int 函数