visual basic 2008 voorbeelden en boeken / visual basic 2010 voorbeelden en boeken

Tot nu toe werden alle instructies in de voorbeelden en oefeningen steeds na elkaar uitgevoerd. Als de eerste instructie is uitgevoerd wordt de tweede uitgevoerd. Men spreekt in dergelijke gevallen over een sequentiestructuur. Alle instructieregels worden hierbij dus in sequentiële volgorde (de volgorde waarin gecodeerd) uitgevoerd.

Met deze gewone sequentiestructuur is niet alles mogelijk. Stel je voor dat een programma de helft van een ingevoerd getal op de console brengt als dit getal even is OFWEL het dubbele van een ingevoerd getal op de console brengt als dit getal oneven is.

Hierbij kan je dus niet meteen na het opvangen van een ingevoerde waarde bepalen/coderen wat hierna dient te gebeuren. Wat er dient te gebeuren is namelijk afhankelijk van het ingevoerde getal.
Het programma dient een beslissing te maken. Er zou moeten beslist worden of de helft of het dubbele van de ingevoerde waarde op de console wordt gebracht.

Dergelijke beslissing kan men toepassen door een beslissings- of selectiestructuur toe te voegen aan het algoritme. Deze structuur is gecentreerd rond een bepaalde voorwaarde/conditie die moet worden geëvalueerd.
Belangrijk te weten is dat conditionele expressies die hiervoor gebruikt worden slecht op twee manieren kunnen worden geëvalueerd. Ofwel is de gestelde conditie waar (True) ofwel onwaar (False).

Module Example
    Sub Main()
        Console.WriteLine("Value ?")
        Dim value As Integer = Console.ReadLine()
        '
        If value Mod 2 = 0 Then
            Console.WriteLine("Half of " & value & " is " & value / 2 & ".")
        Else
            Console.WriteLine("Double of " & value & " is " & value * 2 & ".")
        End If
        '
        Console.ReadLine()
    End Sub
End Module

Value ?
5
Double of 5 is 10.

Value ?
10
Half of 10 is 5.

Een selectiestructuur kan worden toegepast door een If ... End If te gebruiken. Na If plaatst men de conditionele expressie. Is aan deze conditie/voorwaarde voldaan dan zullen de instructies na If worden uitgevoerd. Is niet voldaan aan de conditie zullen de instructies na Else worden uitgevoerd.

Het Else gedeelte is optioneel en hoeft dus niet opgenomen te worden.

De vergelijkingsoperator ( = ) kan gebruikt worden om gelijkheid na te gaan. Deze operator bestaat uit hetzelfde symbool als de toekenningsoperator =, toch heeft deze een andere betekenis.
Een aantal andere vergelijksoperatoren zijn : <> ( verschillend van ), > ( groter dan ), < ( kleiner dan ), >= ( groter of gelijk aan ) en <= ( kleiner of gelijk aan ).

Opgave :

Maak een programma dat naar onderstaand voorbeeld werkt ( invoer staat cursief ).

Value ?
0
Zero.

Value ?
123
Value 123 is not equal to zero.

Oplossing :

Module ExerciseSolution
    Sub Main()
        Dim value As Integer
        '
        Console.WriteLine("Value ?")
        value = Console.ReadLine()
        '
        If value = 0 Then
            Console.WriteLine("Zero.")
        Else
            Console.WriteLine("Value " & value & " is not equal to zero.")
        End If
        '
        Console.ReadLine()
    End Sub
End Module