User manual

101

Omdat bij de
For Next
lus de extreme waarde bepaald wordt moet de tellervariabele van
het type integer zijn.
Voorbeelden
For
i=1
To
10
If
i>a
Then
a=i
End If
a=a-1
Next
For
i=1
To
10
Step
3 ' verhoog i in 3-voudige stappen
If
i>3
Then
a=i
End If
a=a-1
Next

Op deze plaats nogmaals de opmerking, arrays zijn steeds op nul gebaseerd. Een
For
Next lus moet daarom bij een array toegang eerst van 0 to 9 lopen.
Exit aanwijzing
Een
Exit
aanwijzing verlaat de lus, en de uitvoering van het programma start met de
volgende aanwijzing na de For lus.
Voorbeeld:
For
i=1
To
10
If
i=6
Then
Exit
End If
Next
5.3.6.4 Goto
Ook wanneer het binnen een gestructureerde programmeertaal vermeden zal worden is het
toch mogelijk om binnen een procedure met Goto naar een label te springen. Om een label
te kenmerken wordt het commando Lab voor de labelnaam gezet.
' For lus met Goto maakt
Sub
main()
Dim a As Integer
a=0
Lab
label1
a=a+1
If a<10 Then
Goto
label1
End If
End Sub