Udostępnij za pośrednictwem

Porady: tworzenie procedury, która zwraca wartość (Visual Basic)

  • Artykuł

Procedura służy Function do zwracania wartości do kodu wywołującego.

Aby utworzyć procedurę zwracającą wartość

  1. Poza inną procedurą Function użyj instrukcji , a następnie instrukcji End Function .

  2. W instrukcji Function postępuj zgodnie Function ze słowem kluczowym z nazwą procedury, a następnie listę parametrów w nawiasach.

  3. Postępuj zgodnie z nawiasami z klauzulą As , aby określić typ danych zwracanej wartości.

  4. Umieść instrukcje kodu procedury między instrukcjami Function i End Function .

  5. Return Użyj instrukcji , 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 też