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

Как: вернуть значение из процедуры (Visual Basic)

Процедура Function возвращает значение вызывающему коду либо выполняя Return инструкцию, либо сталкиваясь с Exit Function или End Function оператором.

Возврат значения с помощью инструкции Return

  1. Поместите инструкцию Return в пункт завершения задачи процедуры.

  2. Следуйте ключевому слову Return с выражением, которое дает значение, которое нужно вернуть в вызывающий код.

  3. В одной процедуре может быть несколько 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)

Чтобы вернуть значение с использованием оператора Exit Function или End Function

  1. По крайней мере в одном месте процедуры Function назначьте значение имени процедуры.

  2. При выполнении инструкции Exit FunctionEnd Function Visual Basic возвращает последнее значение, назначенное имени процедуры.

  3. В одной процедуре можно использовать более одного Exit Function оператора, а также смешивать Return и Exit Function операторы в одной процедуре.

  4. В процедуре можно использовать только одну End Function инструкцию Function .

    Дополнительные сведения и пример см. в разделе "Возвращаемое значение" в операторе функции.

См. также