GOSUB

Da Gambas-it.org - Wikipedia.
Versione del 4 mar 2012 alle 17:35 di Vuott (Discussione | contributi) (Nuova pagina: L'istruzione '''GOSUB''' consente di saltare all'etichetta dichiarata all'interno della medesima routine. Se poi si incontra l'istruzione RETURN, il programma torna sopra e precisament...)

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

L'istruzione GOSUB consente di saltare all'etichetta dichiarata all'interno della medesima routine. Se poi si incontra l'istruzione RETURN, il programma torna sopra e precisamente alla linea di codice successiva all'istruzione GOSUB.

Esempio:

 ' Gambas class file

Public Sub Button1_Click()
 
 Dim i As Integer
 Dim j As Integer

 For i = 1 To 10
   GoSub label1   ' Il programma salta alla riga dove è presente l'etichetta "label1"
 Next

     Return   ' Il programma esce fuori dalla routine, poiché questo è un normale Return

 label1:
 For j = 1 To 3
   Print "Prova";; i;; j
 Next
 
   Return   ' Questo Return è connesso e dipendente dal Gosub. Pertanto il programma torna su: alla riga successiva al Gosub

End