Porady: tworzenie procedury zwracającej wartość (Visual Basic)

Używasz procedury Function do zwracania wartości do kodu wywołującego.

Poza jakąkolwiek inną procedurą użyj instrukcji Function, a następnie instrukcji End Function.
W instrukcji Function po słowie kluczowym Function podaj nazwę procedury, a następnie listę parametrów w nawiasach.
Postępuj zgodnie z nawiasami z klauzulą As , aby określić typ danych zwracanej wartości.
Umieść instrukcje kodu procedury między instrukcjami Function i End Function .
Użyj instrukcji Return, aby zwrócić wartość do kodu wywołującego.

Poniższa Function procedura oblicza najdłuższą stronę lub hipotenuse trójkąta prawego, biorąc pod uwagę wartości pozostałych dwóch stron.
```
Function Hypotenuse(side1 As Double, side2 As Double) As Double
    Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
End Function
```
W poniższym przykładzie pokazano typowe wywołanie metody hypotenuse.
```
Dim testLength, testHypotenuse As Double
testHypotenuse = Hypotenuse(testLength, 10.7)
```

Zobacz także