Поделиться через


Практическое руководство. Создание процедуры, возвращающей значение (Visual Basic)

Для возврата значения в вызывающий код используется Function процедура.

Создание процедуры, возвращающей значение

  1. За пределами любой другой процедуры используйте Function инструкцию, за которой следует End Function оператор.

  2. Function В инструкции следуйте Function ключевое слово с именем процедуры, а затем список параметров в скобках.

  3. Следуйте скобкам с предложением As , чтобы указать тип данных возвращаемого значения.

  4. Поместите инструкции кода процедуры между Function операторами и End Function операторами.

  5. Используйте инструкцию Return , чтобы вернуть значение в вызывающий код.

    Function Следующая процедура вычисляет самую длинную сторону или гипотенузу правого треугольника, учитывая значения для других двух сторон.

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

    В следующем примере показан типичный вызов hypotenuse.

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

См. также