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