GOTO

Da Gambas-it.org - Wikipedia.
Versione del 6 lug 2024 alle 16:04 di Vuott (Discussione | contributi)

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

L'istruzione GOTO consente di saltare all'etichetta dichiarata all'interno della medesima routine. Il programma continuerà il processo semplicemente dalla riga (ossia l'etichetta dichiarata) ove è saltato.

GOTO etichetta

......
etichetta: ......


Esempio:

Public Sub Main()
 
 Dim b, j As Byte

 For b = 1 To 5
   GoTo etichetta1   ' Il programma salta alla riga dove è presente l'etichetta "etichetta1"
 Next

 Print "Riga che sarà saltata." ' Questa riga del Print sarà saltata !

 etichetta1:

 For j = 1 To 3 ' Terminato questo ciclo il programma uscirà dalla routine
   Print "Prova: "; b;; j
 Next
 
End


Ma anche con comandi invertiti:

Public Sub Main()

 Dim b As Byte

 etichetta1:

 Inc b

 If b == 10 Then
   Print b
 Else
   GoTo etichetta1   ' Il programma salta alla riga dove è presente l'etichetta "etichetta1"
 Endif

End