Share via


Procedure: Een procedure maken die een waarde retourneert (Visual Basic)

U gebruikt een Function procedure om een waarde te retourneren aan de aanroepende code.

Een procedure maken die een waarde retourneert

  1. Gebruik buiten een andere procedure een Function instructie, gevolgd door een End Function instructie.

  2. Volg in de Function instructie het Function trefwoord met de naam van de procedure en vervolgens de lijst met parameters tussen haakjes.

  3. Volg de haakjes met een As component om het gegevenstype van de geretourneerde waarde op te geven.

  4. Plaats de code-instructies van de procedure tussen de Function en End Function de instructies.

  5. Gebruik een Return instructie om de waarde te retourneren aan de aanroepende code.

    Met de volgende Function procedure wordt de langste zijde of hypotenuse van een driehoek rechts berekend op basis van de waarden voor de andere twee zijden.

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

    In het volgende voorbeeld ziet u een typische aanroep naar hypotenuse.

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

Zie ook