Visual Basic is een programmeertaal ontwikkeld door Microsoft . Visual Basic is nauw geïntegreerd met de Office productiviteit suite ; alle Office- hulpprogramma kan de gebruiker om hun functionaliteit te vergroten door het schrijven van zijn eigen Visual Basic -programma's . Onder andere soorten gegevens , Visual Basic heeft Integer en Long . Beide soorten bevatten gehele getallen , maar Long waarden uit een groter interval kan nemen . Dienovereenkomstig , Long neemt meer geheugen dan Integer . Als een waarde opgeslagen in een Long variabele past in de Integer assortiment , kunt u deze converteren naar Integer in uw Visual Basic -programma's . Instructies 1 Bereken de maximale waarde die in een Integer kan worden opgeslagen , door het opnemen van de volgende regels in uw Visual Basic-programma : Dim maxInteger als Geheel maxInteger = 2 ^ ( Len ( maxInteger ) * 8-1 ) -1 controleren 2 als de Long waarde die u wilt converteren naar Integer past binnen het bereik van de waarden van een Integer kan bevatten , zoals in deze voorbeeldcode : Dim sampleLong As Long ' de waarde van sampleLong Compute Als ( ( sampleLong > maxInteger ) of ( sampleLong < - maxInteger - 1 ) ) dan handleOutOfBounds End Als Vervang de aanroeping aan subprogramma " handleOutOfBounds " door de manier waarop uw programma behandelt het geval van de Long waarde niet wordt omgezet in een . integer 3 Zet de lange waarde in een geheel getal , zoals in deze voorbeeldcode : Dim sampleInteger als Geheel sampleInteger = CInt ( sampleLong ) op Na het uitvoeren van de aanroeping aan ingebouwde functie " CInt ( ) " , zal sampleInteger dezelfde waarde als sampleLong . bevatten |