Написание процедуры Function

Процедура Function — это ряд операторов Visual Basic, заключенных в инструкции Function и End Function . Процедура Function похожа на процедуру Sub , но функция также может возвращать значение.

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

В следующем примере показано, как с помощью функции Celsius можно преобразовать градусы Фаренгейта в градусы Цельсия. Если функция вызывается из процедуры Main, переменная, которая содержит значение аргумента, передается функции. Результат вычислений отображается в вызывающем коде, который виден в окне сообщения.

Sub Main() 
    temp = Application.InputBox(Prompt:= _ 
        "Please enter the temperature in degrees F.", Type:=1) 
    MsgBox "The temperature is " & Celsius(temp) & " degrees C." 
End Sub 
 
Function Celsius(fDegrees) 
    Celsius = (fDegrees - 32) * 5 / 9 
End Function

См. также

• Темы по основам Visual Basic

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.