Clnt 函数

返回已转换为子类型 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