Differenze tra le versioni di "BREAK-EXIT"

Da Gambas-it.org - Wikipedia.
Riga 3: Riga 3:
  
 
Esempio:
 
Esempio:
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
 
   Dim a As Byte
 
   Dim a As Byte
Riga 10: Riga 10:
 
     If a = 55 Then
 
     If a = 55 Then
 
       Print "a = "; a
 
       Print "a = "; a
       <FONT color=#B22222>'''Break'''</font>  <FONT Color=gray>' ''oppure:'' '''Exit'''</font>
+
       <FONT color=red>'''Break'''</font>  <FONT Color=gray>' ''oppure:'' '''Exit'''</font>
 
     Endif
 
     Endif
 
   Next
 
   Next
Riga 16: Riga 16:
 
   Print "Questa è l'istruzione successiva. "
 
   Print "Questa è l'istruzione successiva. "
 
   
 
   
  '''End'''
+
  End
  
  
  
 
=Note=
 
=Note=
[1] Se si vuole che il programma esca dal ciclo e non prosiegua con il restante codice, uscendo così proprio dalla routine, allora si dovrà usare l'istruzione "[[RETURN|Return]]" anziché "Break".
+
[1] Se si vuole che il programma esca dal ciclo e non prosegua con il restante codice, uscendo così proprio dalla routine, allora si dovrà usare l'istruzione "[[RETURN|Return]]" anziché "Break".

Versione delle 16:54, 6 lug 2024

Break / Exit: determinano l'uscita immediata da un ciclo.
Il programma continua, comunque, all'interno della medesima routine, e più precisamente all'istruzione successiva al ciclo, dal quale è uscito. [nota 1]

Esempio:

Public Sub Main()

 Dim a As Byte

 For a = 1 To 100
   If a = 55 Then
     Print "a = "; a
     Break   ' oppure: Exit
   Endif
 Next

 Print "Questa è l'istruzione successiva. "

End


Note

[1] Se si vuole che il programma esca dal ciclo e non prosegua con il restante codice, uscendo così proprio dalla routine, allora si dovrà usare l'istruzione "Return" anziché "Break".