Differenze tra le versioni di "BREAK-EXIT"

Da Gambas-it.org - Wikipedia.
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 3: Riga 3:
  
 
Esempio:
 
Esempio:
  '''Public''' Sub Main()
+
  Public Sub Main()
 
   
 
   
   Dim a As Byte
+
   Dim b As Byte
 
   
 
   
   For a = 1 To 100
+
   For b = 1 To 100
     If a = 55 Then
+
     If b= 55 Then
       Print "a = "; a
+
       Print "b = "; b
       <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 attuale 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 b As Byte

 For b = 1 To 100
   If b= 55 Then
     Print "b = "; b
     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".