Differenze tra le versioni di "RETURN"
Da Gambas-it.org - Wikipedia.
(Creata pagina con ''''Return''': determina l'uscita dalla routine. Esempio: '''Public''' Sub Button1_Click() Dim a As Byte For a = 1 To 100 If a = 55 Then Print "a = "; a ''...') |
|||
Riga 13: | Riga 13: | ||
Next | Next | ||
+ | '''End''' | ||
+ | |||
+ | |||
+ | ===Differenza fra "''Break''" e "''Return''"=== | ||
+ | L'effetto prodotto dall'istruzione "''Return''" consiste nella circostanza che l'uscita dalla routine sarà definitiva, ossia non saranno eseguite altre istruzioni eventualmente sottostanti. | ||
+ | |||
+ | Esempio: | ||
+ | bo As Boolean | ||
+ | |||
+ | |||
+ | '''Public''' Sub Form_Open() | ||
+ | |||
+ | Me.Show | ||
+ | |||
+ | Ciclo() | ||
+ | |||
+ | '''End''' | ||
+ | |||
+ | '''Private''' Procedure Ciclo() | ||
+ | |||
+ | Dim a As Byte | ||
+ | |||
+ | Do | ||
+ | If bo Then <FONT Color=#B22222>Return</font> | ||
+ | If a == 20 Then <FONT Color=blue>Break</font> | ||
+ | Me.Caption = CStr(a) | ||
+ | Wait 0.3 | ||
+ | Inc a | ||
+ | Loop | ||
+ | |||
+ | Me.Caption = "Istruzione successiva al ciclo 'For...Next'" | ||
+ | |||
+ | '''End''' | ||
+ | |||
+ | '''Public''' Sub Button1_Click() | ||
+ | |||
+ | bo = True | ||
+ | |||
'''End''' | '''End''' |
Versione delle 08:01, 11 ago 2020
Return: determina l'uscita dalla routine.
Esempio:
Public Sub Button1_Click() Dim a As Byte For a = 1 To 100 If a = 55 Then Print "a = "; a Return Endif Next End
Differenza fra "Break" e "Return"
L'effetto prodotto dall'istruzione "Return" consiste nella circostanza che l'uscita dalla routine sarà definitiva, ossia non saranno eseguite altre istruzioni eventualmente sottostanti.
Esempio:
bo As Boolean Public Sub Form_Open() Me.Show Ciclo() End Private Procedure Ciclo() Dim a As Byte Do If bo Then Return If a == 20 Then Break Me.Caption = CStr(a) Wait 0.3 Inc a Loop Me.Caption = "Istruzione successiva al ciclo 'For...Next'" End Public Sub Button1_Click() bo = True End