Postupy: Vytvoření procedury, která vrátí hodnotu (Visual Basic).

Slouží Function postupu vraťte hodnotu volající kód.

Vytvořit proceduru, která vrací hodnotu

1. Mimo jiné postup použít Function příkazu, následovaný End Function prohlášení.

2. V Function prohlášení, postupujte Function klíčové slovo s názvem postup a seznam parametrů v závorkách.

3. Postupujte podle závorek se As klauzuli určete datový typ vrácené hodnoty.

4. Příkazy kódu v postupu mezi umístit Function a End Function příkazy.

5. Použití Return příkaz vrátí hodnotu kódu volajícího.

   Následující Function postup vypočítá nejdelší strana nebo přepony pravoúhlého trojúhelníku, hodnoty dané pro dvě strany.

   Function hypotenuse(ByVal side1 As Single, ByVal side2 As Single) As Single 
       Return Math.Sqrt((side1 ^ 2) + (side2 ^ 2))
   End Function
   

   Následující příklad ukazuje typické volání hypotenuse.

   Dim testLength, testHypotenuse As Single
   testHypotenuse = hypotenuse(testLength, 10.7)
   

Viz také

Úkoly

Postupy: Vrácení hodnoty z procedury (Visual Basic)

Postupy: Volání procedury, která vrátí hodnotu (Visual Basic).

Referenční dokumentace

Function – příkaz (Visual Basic)

Koncepty

Procedury v jazyce Visual Basic

Sub – procedury (Visual Basic)

Procedury vlastnosti (Visual Basic)

Procedury operátoru (Visual Basic)

Parametry a argumenty procedury (Visual Basic)