CInt

将表达式强制转换为 Integer。

语法：CInt( expression )

expression

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

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

当小数部分恰好为 0.5 时，CInt 始终舍入到最接近的偶数。例如，0.5 舍入为 0，1.5 舍入为 2。CInt 与 Fix 和 Int 函数不同，后者截断而非舍入数字的小数部分。此外，Fix 和 Int 始终返回与传入值相同类型的值。

CInt 是替代 Val 将字符串转换为数值类型的区域感知方案。

示例

此示例使用 CInt 函数将值转换为 Integer。

Dim MyDouble, MyInt
MyDouble = 2345.5678                 ' MyDouble is a Double.
MyInt = CInt(MyDouble)               ' MyInt contains 2346.

另请参阅

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