Uso di While... Wend

L'istruzione While...Wend è specificata in BSL per gli utenti che ne conoscono l'utilizzo. Tuttavia, dal momento che l'istruzione While...Wend non è flessibile, si consiglia di utilizzare l'istruzione Do...Loop.

Nell'esempio seguente viene illustrato l'uso del loop While Wend.

Esempio 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