Differenze tra le versioni di "GOSUB"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
L'istruzione '''GOSUB''' consente di saltare all'etichetta dichiarata all'interno della medesima routine. Se poi il programma incontra l'istruzione RETURN, esso torna sopra e precisamente alla linea di codice successiva all'istruzione GOSUB. | L'istruzione '''GOSUB''' consente di saltare all'etichetta dichiarata all'interno della medesima routine. Se poi il programma incontra l'istruzione RETURN, esso torna sopra e precisamente alla linea di codice successiva all'istruzione GOSUB. | ||
+ | |||
+ | GOSUB etichetta | ||
+ | <BR>...... | ||
+ | <BR>etichetta: | ||
+ | ...... | ||
+ | <BR>Return | ||
+ | |||
+ | |||
Esempio: | Esempio: | ||
Riga 11: | Riga 19: | ||
For i = 1 To 5 | For i = 1 To 5 | ||
− | <Font Color= #B22222>GoSub</font> | + | <Font Color= #B22222>GoSub</font> etichetta1 ''<Font Color= #006400>' Il programma salta alla riga dove è presente l'etichetta "label1"''</font> |
Next | Next | ||
Return ''<Font Color= #006400>' Il programma esce fuori dalla routine, poiché questo è un normale Return''</font> | Return ''<Font Color= #006400>' Il programma esce fuori dalla routine, poiché questo è un normale Return''</font> | ||
− | + | etichetta1: | |
For j = 1 To 3 | For j = 1 To 3 | ||
Print "Prova";; i;; j | Print "Prova";; i;; j |
Versione delle 17:46, 4 mar 2012
L'istruzione GOSUB consente di saltare all'etichetta dichiarata all'interno della medesima routine. Se poi il programma incontra l'istruzione RETURN, esso torna sopra e precisamente alla linea di codice successiva all'istruzione GOSUB.
GOSUB etichetta
......
etichetta: ......
Return
Esempio:
' Gambas class file Public Sub Button1_Click() Dim i As Integer Dim j As Integer For i = 1 To 5 GoSub etichetta1 ' Il programma salta alla riga dove è presente l'etichetta "label1" Next Return ' Il programma esce fuori dalla routine, poiché questo è un normale Return etichetta1: 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
In console avremo:
Prova 1 1
Prova 1 2
Prova 1 3
Prova 2 1
Prova 2 2
Prova 2 3
Prova 3 1
Prova 3 2
Prova 3 3
Prova 4 1
Prova 4 2
Prova 4 3
Prova 5 1
Prova 5 2
Prova 5 3