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.

Utanför andra procedurer använder du en Function -instruktion följt av en End Function -instruktion.
I -instruktionen Function följer du nyckelordet Function med namnet på proceduren och sedan parameterlistan inom parenteser.
Följ parenteserna med en As sats för att ange datatypen för det returnerade värdet.
Placera procedurens kodinstruktioner mellan Function och End Function-uttrycken.
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 hypotenusan, av en rätvinklig triangel, givet 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

Var den här sidan till hjälp?