Visual Basic é uma linguagem de programação de computador desenvolvido pela Microsoft. Visual Basic é totalmente integrado com a suíte de produtividade Office , todos os utilitários de escritório permitem que o usuário para aumentar a sua funcionalidade , escrevendo seus próprios programas do Visual Basic . Entre outros tipos de dados , Visual Basic tem Integer e Long. Ambos os tipos contêm números inteiros , mas de longa pode assumir valores de um intervalo maior. Assim , Long tem mais memória do que Integer. Se um valor armazenado em uma variável de longo encaixa no intervalo inteiro , você pode convertê-lo para Integer em seus programas Visual Basic . Instruções
1

Calcule o valor máximo que pode ser armazenado em um número inteiro , incluindo as seguintes linhas em seu programa Visual Basic :

Dim maxInteger As Integer

maxInteger = 2 ^ ( Len ( maxInteger ) * 8-1 ) -1
2

Verifique se o valor Long que você deseja converter para Integer se encaixa dentro da faixa de valores de um Integer pode conter , como em este código de exemplo :

Dim sampleLong as Long

' Calcular o valor de sampleLong

Se ( ( sampleLong > maxInteger ) Or ( sampleLong <- maxInteger -1) ) Então

handleOutOfBounds

End If

Substitua a invocação a sub-rotina " handleOutOfBounds " pela maneira pela qual o programa lida com o caso do valor Long não ser conversíveis em um integer
3

Converta o valor Long em um Integer , como neste exemplo de código : .

Dim sampleInteger as Integer

sampleInteger = CInt ( sampleLong )

Depois de executar a invocação de função built-in " CInt ()" , sampleInteger irá conter o mesmo valor que sampleLong .