Condividi tramite


Procedura: creare una routine che restituisce un valore (Visual Basic)

Usare una routine Function per restituire un valore al codice chiamante.

Per creare una routine che restituisce un valore

  1. All'esterno di qualsiasi altra routine, usare un'istruzione Function, seguita da un'istruzione End Function.

  2. Nell'istruzione Function far seguire la parola chiave Function dal nome della routine, quindi dall'elenco di parametri tra parentesi.

  3. Dopo le parentesi usare una clausola As per specificare il tipo di dati del valore restituito.

  4. Inserire le istruzioni di codice della routine tra le istruzioni Function e End Function.

  5. Usare un'istruzione Return per restituire il valore al codice chiamante.

    La routine Function seguente calcola il lato più lungo, o ipotenusa, di un triangolo rettangolo, in base ai valori per gli altri due lati.

    Function Hypotenuse(side1 As Double, side2 As Double) As Double
        Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
    End Function
    

    Nell'esempio seguente viene illustrata una chiamata tipica a hypotenuse.

    Dim testLength, testHypotenuse As Double
    testHypotenuse = Hypotenuse(testLength, 10.7)
    

Vedi anche