Obsługa podprogramów > For ... Next - struktura

Drukuj

For ... Next - struktura symp

Polecenie umożliwia wykonanie bloku wyrażeń ściśle określoną liczbę razy. Polecenie to różni się w szczegółach od standardowego polecenia języka Basic:

1.Zmienna sterująca jest zwykłą zmienną, która musi być wcześniej utworzona i którą można dowolnie modyfikować zarówno przed, wewnątrz pętli jak i po zakończeniu pętli.

2.Przerwanie pętli następuje po spełnieniu warunku końca, a nie po osiągnięciu przez zmienną określonej wartości. W szczególności wyrażenie może w ogóle nie zawierać zmiennej.

3.Z pętli można wyjść i do jej wnętrza można weść w dowolnym momencie poleceniem GoTo lub GoSub.

4.Zamknięcie pętli (Next) może wystąpić tylko w jednym miejscu (nie może być kilku poleceń Next dla jednego polecenia For), i nie może być umieszczone wewnątrz polecenia warunkowego.

 

Polecenie For dla plików powoduje wykonanie bloku wyrażeń dla wszystkich plików dyskowych pasujących do podanej maski pliku. Aktualną nazwę pliku można pobrać poleceniem Name. Każdy plik jest otwierany przed wykonaniem bloku poleceń i zamykany po jego wykonaniu.

 

Składnia

For zmienna = wartosc_pocz To warunek_konca
        blok_wyrażeń
Next zmienna

lub

For zmienna = wartosc_pocz To warunek_konca Step przyrost
        blok_wyrażeń
Next zmienna

 

Argumenty

Typ

Nazwa

Opis

 

zmienna

Nazwa zmiennej sterującej pętlą. Zmienna musi być typu całkowitego: Int lub Long. Musi być wcześniej zadeklarowana.

 

wartosc_pocz

Wartość początkowa nadana zmiennej na początku wykonania pętli programu. Może to być dowolne wyrażenie.

 

warunek_konca

Blok wyrażeń jest wykonywany do czasu, aż wyrażenie stanie się prawdziwe (wartość niezerowa).

 

przyrost

Wartość, która zostanie dodana do zmiennej po każdym przebiegu pętli. Wartość domyślna przyrostu wynosi 1.

 

Wartość zwracana

Nie zwraca wartości.

 

Przykład

//Zainicjowanie licznika
Int Licznik = 0
String Numer = "0"
//Uruchomienie pętli
For Licznik = 0 To Licznik > 9999
PopUp (1, "Pętla numer " + Numer)
Licznik = Licznik + 1
Numer = Using "%L",Licznik
Next Licznik
String K1="Zakończono demonstrację struktury For - Next"
//Wyświetlenie komunikatu o zakończeniu
Message K1