Función Clnt

Devuelve una expresión que se ha convertido en una variante de subtipo Integer.

Sintaxis

CInt(expression)

Observaciones

El argumento expression es cualquier expresión válida.

Utilice la función CInt para proporcionar conversiones de alcance internacional de cualquier otro tipo de dato a un subtipo Integer. Por ejemplo, se reconocen correctamente distintos separadores decimales en función de la configuración regional del sistema, al igual que diferentes separadores de miles.

Si la expresión se encuentra fuera del rango aceptable para el subtipo Integer, se produce un error.

En el siguiente ejemplo se utiliza la función CInt para convertir un valor en Integer:

Ejemplo 1:

Dim MyDouble, MyInt
MyDouble = 2345.5678    
MyInt = CInt(MyDouble)   
'Output:  2346

Ejemplo 2:

Dim MyString
MyString = "12345.67"    
MyInt = CInt(MyString)  
'Output: 12346

Ejemplo 3:

MyDouble = 2.6
MyInt = CInt(MyDouble)   
'Output: 3

Ejemplo 4:

MyDouble = 2.4
MyInt = CInt(MyDouble)   
'Output: 2

Ejemplo 5:

MyDouble = 1.5
MyInt = CInt(MyDouble) ' 1.5 rounds to 2(nearest even integer)
'Output: 2

Ejemplo 6:

MyDouble = 0.5
MyInt = CInt(MyDouble) ' 0.5 rounds to 0(nearest even integer)
'Output: 0

Nota:

CInt difiere de las funciones Fix e Int, que truncan, en lugar de redondear, la parte fraccionaria de un número. Cuando la parte fraccionaria es exactamente 0,5, la función CInt siempre la redondea al número par más cercano. Por ejemplo, 0,5 se redondea a 0 y 1,5 se redondea a 2.