RETURN
Da Gambas-it.org - Wikipedia.
Versione del 10 gen 2022 alle 15:41 di Vuott (Discussione | contributi)
Uso di Return nelle routine per uscire da esse
Return determina l'uscita immediata e diretta dalla routine.
Esempio:
Public Procedure Esempio(b As Byte) If b < 100 Then Return Print b End
L'istruzione Return è anche capace contestualmente di interrompere un ciclo e far uscire dalla routine:
Public Sub Main() Dim b As Byte For b = 1 To 10 If b == 5 Then Return Print b Next Print "Uscito dal solo ciclo FOR." ' Ovviamente questa riga non sarà mai raggiunta End
Differenza fra "Break" e "Return" all'interno di un ciclo
L'effetto prodotto dall'istruzione Return all'interno di un ciclo consiste nella circostanza che l'uscita dalla routine sarà immediata e definitiva, ossia non saranno eseguite altre istruzioni eventualmente sottostanti presenti nella routine.
Diversamente l'istruzione Break fa uscire il processo del codice soltanto e semplicemente dal ciclo, ma non causa la necessaria, diretta e immediata uscita dalla routine.
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
Uso di Return nelle funzioni per ritornare un valore
L'istruzione Return è indispensabile all'interno delle funzioni, scritte dal programmatore, per ritornare un valore alla funzione chiamante.
Esempio:
Public Sub Main() dim rit As Integer rit = Funzione(21081.969) ' Istruzione chiamante Print rit End Private Function Funzione(f As Float) As Integer ' Funzione chiamata Dim i As Integer i = f * 1000 ' Ritorna all'istruzione chiamante il valore della variabile "i": Return i End