Obsługa podprogramów > Return - polecenie

Drukuj

Return - polecenie symp

Polecenie powoduje powrót do instrukcji następnej po ostatniej wykonanej instrukcji GoSub. Wywołanie polecenia Return bez wcześniejszego wywołania GoSub powoduje przerwanie wykonania programu i komunikat o błędzie.

 

Składnia

Return

 

Argumenty

Brak.

 

Wartość zwracana

Nie zwraca wartości.

 

Przykład

Int wart = 0
//Skok do pętli licznika
GoSub wyj
Message "Miejsce powrotu po wykonaniu polecenia Return "
//Okno z komunikatem o zakończeniu demonstracji licznika
Form "Informacja o zakończeniu pętli",400,200
Ground 0,255,0
Button "O&K", 150, 110, 100, 24, -1
Text "Zakończono pokaz działania pętli z poleceniem Return",50,30,300,24
ExecForm
End
//Etykieta
wyj:
//Okno z komunikatem o wartości licznika
Form "Liczenie do sześciu",400,200
Ground 255,255,0
Button "O&K", 150, 110, 100, 24, -1
Text "Pokaz działania pętli z poleceniem Return",100,10,200,24
Text " < 6. Naciśnij OK w celu powiększenia stanu licznika",130,50,250,24
Edit "Wartość licznika",wart,110,50,20,24
ExecForm
//Struktura sprawdzania i powiększania stanu licznika
If wart <= 4 then
wart = wart + 1
//Skok do etykiety
GoTo wyj:
Else
//Wyjście z pętli
Return
EndIf