返回已转换为子类型 Integer 的变体的一个表达式。
语法
CInt(expression)
注释
expression 参数是任何有效的表达式。
可使用 CInt 函数实现从任何其他数据类型到 Integer 子类型的国际化转换。例如,根据系统的区域设置,可以正确识别不同的小数分隔符,也可以识别不同的千位分隔符。
如果 expression 超出 Integer 子类型的可接受范围,则会出现错误。
以下示例使用 CInt 函数将值转换为 Integer 子类型:
示例 1:
Dim MyDouble, MyInt MyDouble = 2345.5678 MyInt = CInt(MyDouble) 'Output: 2346
示例 2:
Dim MyString MyString = "12345.67" MyInt = CInt(MyString) 'Output: 12346
示例 3:
MyDouble = 2.6 MyInt = CInt(MyDouble) 'Output: 3
示例 4:
MyDouble = 2.4 MyInt = CInt(MyDouble) 'Output: 2
示例 5:
MyDouble = 1.5 MyInt = CInt(MyDouble) ' 1.5 rounds to 2(nearest even integer) 'Output: 2
示例 6:
MyDouble = 0.5 MyInt = CInt(MyDouble) ' 0.5 rounds to 0(nearest even integer) 'Output: 0
注:
CInt 与 Fix 和 Int 函数不同,后者截断而不是舍入数字的小数部分。当小数部分正好为 0.5 时,CInt 函数始终将其舍入到最接近的偶数。例如,将 0.5 舍入为 0,将 1.5 舍入为 2