Dela via


Anvisningar: Skapa en procedur som returnerar ett värde (Visual Basic)

Du använder en Function procedur för att returnera ett värde till den anropande koden.

Skapa en procedur som returnerar ett värde

  1. Utanför andra procedurer använder du en Function -instruktion följt av en End Function -instruktion.

  2. I -instruktionen Function följer du nyckelordet Function med namnet på proceduren och sedan parameterlistan inom parenteser.

  3. Följ parenteserna med en As sats för att ange datatypen för det returnerade värdet.

  4. Placera procedurens kodinstruktioner mellan - och End Function -uttryckenFunction.

  5. Använd en Return instruktion för att returnera värdet till den anropande koden.

    Följande Function procedur beräknar den längsta sidan, eller hypotenuse, av en höger triangel, med tanke på värdena för de andra två sidorna.

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

    I följande exempel visas ett typiskt anrop till hypotenuse.

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

Se även