Função Clnt

Retorna uma expressão que foi convertida em uma Variante do subtipo Inteiro.

Sintaxe

CInt(expression)

Comentários

O argumento expression é qualquer expressão válida.

Use a função CInt para fornecer conversões com conhecimento internacional de qualquer outro tipo de dados em um subtipo Inteiro. Por exemplo, diferentes separadores decimais são devidamente reconhecidos com base na configuração regional do sistema, assim como diferentes separadores de milhar.

Se a expressão ficar fora do intervalo aceitável para o subtipo Inteiro, ocorrerá um erro.

O exemplo a seguir usa a função CInt para converter um valor em um Inteiro:

Exemplo 1:

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

Exemplo 2:

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

Exemplo 3:

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

Exemplo 4:

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

Exemplo 5:

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

Exemplo 6:

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

Nota:

CInt difere das funções Fix e Int, que truncam, em vez de arredondar, a parte fracionária de um número. Quando a parte fracionária é exatamente 0,5, a função CInt sempre arredonda para o número par mais próximo. Por exemplo, 0,5 é arredondado para 0 e 1,5 é arredondado para 2