Come convertire a lungo per interi in Visual Basic

January 25

Visual Basic è un linguaggio di programmazione sviluppato da Microsoft. Visual Basic è strettamente integrato con la suite di produttività per ufficio; tutte le utenze di Office consentono all'utente di aumentare la loro funzionalità, scrivendo i propri programmi Visual Basic. Tra gli altri tipi di dati, Visual Basic ha Integer e Long. Entrambi i tipi contengono numeri interi, ma a lungo può assumere valori da un intervallo più grande. Di conseguenza, a lungo richiede più memoria rispetto Integer. Se un valore memorizzato in una variabile lungo si inserisce nel campo dei numeri interi, è possibile convertirlo in intero nei programmi Visual Basic.

istruzione

1 Calcolare il valore massimo che può essere memorizzato in un intero, includendo le seguenti righe nel programma Visual Basic:

Dim maxInteger As Integer

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

2 Controllare se il valore a lungo che si desidera convertire in numero intero si inserisce all'interno della gamma di valori di un intero può contenere, come in questo codice di esempio:

Dim sampleLong As Long

'Calcolare il valore della sampleLong

Se ((sampleLong> maxInteger) O (sampleLong <-maxInteger-1)) Then

handleOutOfBounds

Finisci se

Sostituire l'invocazione di sottoprogrammi "handleOutOfBounds" dal modo in cui il programma gestisce il caso del Valore a lungo non essere convertibile in un numero intero.

3 Convertire il valore a lungo in un intero, come in questo codice di esempio:

Dim sampleInteger As Integer

sampleInteger = CInt (sampleLong)

Dopo aver eseguito l'invocazione alla funzione built-in "CInt ()", sampleInteger conterrà lo stesso valore di sampleLong.