Obsługa podprogramów > For ... Next - struktura | | Drukuj |
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