GOTO: differenze tra le versioni

Da Gambas-it.org - Wikipedia.
Vai alla navigazione Vai alla ricerca
Nessun oggetto della modifica
Nessun oggetto della modifica
Riga 10: Riga 10:
Esempio:
Esempio:


  ''<Font Color= #006400>' Gambas class file''</font>
<Font Color=gray>' ''Gambas class file''</font>
   
   
  '''Public''' Sub Button1_Click()
  '''Public''' Sub Main()
    
    
   Dim i As Integer
   Dim i As Integer
Riga 18: Riga 18:
   
   
   For i = 1 To 5
   For i = 1 To 5
     <Font Color= #B22222>GoTo</font> etichetta1      <Font Color= #006400>' ''Il programma salta alla riga dove è presente l'etichetta "etichetta1"''</font>
     <Font Color= #B22222>GoTo</font> etichetta1      <Font Color=gray>' ''Il programma salta alla riga dove è presente l'etichetta "etichetta1"''</font>
   Next
   Next
   
   
   Print "Passaggio"      <Font Color= #006400>' ''Questa riga del Print sarà saltata !''</font>
   Print "Riga che sarà saltata."      <Font Color=gray>' ''Questa riga del Print sarà saltata !''</font>
   
   
     <Font Color= #B22222>etichetta1:</font>
     <Font Color= #B22222>etichetta1:</font>
   For j = 1 To 3          <Font Color= #006400>' ''Terminato questo ciclo il programma uscirà dalla routine''</font>
   For j = 1 To 3          <Font Color=gray>' ''Terminato questo ciclo il programma uscirà dalla routine''</font>
     Print "Prova";; i;; j
     Print "Prova";; i;; j
   Next
   Next

Versione delle 09:49, 27 apr 2015

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:

' Gambas class file

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

 For i = 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";; i;; j
 Next
 
End

In console avremo:

Prova 1 1
Prova 1 2
Prova 1 3