ubiquitour.com

Cómo convertir a números enteros en Visual Basic

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

Instrucciones

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

Dim maxInteger As Integer

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

2 Compruebe si el valor de tipo Long que desea convertir a entero cabe dentro de la gama de valores que puede contener un entero, como en este ejemplo de código:

Como largo dévil sampleLong

' Calcular el valor de sampleLong

Si ((sampleLong > maxInteger) o (sampleLong < - maxInteger-1)) entonces

handleOutOfBounds

End If

Reemplace la llamada a la subrutina "handleOutOfBounds" por la manera en que el programa maneja el caso del valor de tipo Long no es convertible en un número entero.

3 Convertir el valor de tipo Long en un entero, como en este ejemplo de código:

Dim sampleInteger As Integer

sampleInteger = CInt(sampleLong)

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