Visual Basic es un lenguaje de programación desarrollado por Microsoft . Visual Basic está estrechamente integrado con la suite de productividad de oficina, todos los servicios de oficina permiten al usuario aumentar su funcionalidad al escribir sus propios programas de Visual Basic . Entre otros tipos de datos , Visual Basic tiene Integer y largo . Ambos tipos contienen números enteros , pero a largo pueden tomar valores de un intervalo más grande. En consecuencia , Long tiene más memoria que Integer. Si un valor almacenado en una variable a largo encaja en el rango del número entero , se puede convertir a entero en sus programas de Visual Basic . Instrucciones
1

Calcular el valor máximo que puede almacenarse en un entero , incluyendo las siguientes líneas en el programa de Visual Basic : Dim

maxInteger As Integer

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

Comprobar si el valor de largo que desea convertir a ataques entero dentro del rango de valores que puede contener un número entero , como en este código de ejemplo :

sampleLong Dim As Long

' Calcular el valor de sampleLong

If ( ( sampleLong > maxInteger ) O ( sampleLong <- maxInteger - 1 ) ) Luego

handleOutOfBounds

End If

Sustituya la invocación a subrutinas " handleOutOfBounds " por la forma en que el programa maneja el caso del valor Long no es convertible en una . Integer
3

Convierte el valor a largo en un entero , como en este ejemplo de código:

sampleInteger Dim As Integer

sampleInteger = CInt ( sampleLong )

Después de ejecutar la invocación de una función de función " CInt ()" , sampleInteger contendrá el mismo valor que sampleLong .