RETURN: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
(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 ''...') |
Nessun oggetto della modifica |
||
| 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 09: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