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

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

All'esterno di qualsiasi altra procedura, usare un'istruzione Function , seguita da un'istruzione End Function .
Nell'istruzione Function seguire la Function parola chiave con il nome della routine e quindi l'elenco dei parametri tra parentesi.
Seguire le parentesi con una As clausola per specificare il tipo di dati del valore restituito.
Inserire le istruzioni di codice della routine tra le istruzioni Function e End Function.
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 degli 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)
```

Vedere anche