"While...Wend" verwenden

Die "While...Wend"-Anweisung wird in BSL für die Personen bereitgestellt, die mit ihrer Verwendung vertraut sind. Wegen der mangelnden Flexibilität von "While...Wend" wird jedoch empfohlen, stattdessen "Do...Loop" zu verwenden.

Das folgende Beispiel veranschaulicht die Verwendung der "While...Wend"-Schleife:

Beispiel 1:

Sub BasicWhileWend()
    Dim counter, myNum
            counter = 0
            myNum = 5
            While myNum > 0
                myNum = myNum - 1
                counter = counter + 1
            Wend
            'This loop made 5 repetitions
        End Sub