Передача аргументов по значению и по ссылке (Visual Basic)

2025-06-17

В Visual Basic можно передать аргумент в процедуру по значению или по ссылке. Это называется механизмом передачи и определяет, может ли процедура изменять элемент программирования, базовый аргумент в вызывающем коде. Объявление процедуры определяет механизм передачи для каждого параметра, указав ключевое слово ByVal или ByRef .

Различия

При передаче аргумента в процедуру следует учитывать несколько различных различий, взаимодействующих друг с другом:

Является ли базовый элемент программирования измененным или неизменяемым
Является ли сам аргумент модификируемым или неизменяемым
Указывает, передается ли аргумент по значению или по ссылке
Тип данных аргумента является типом значений или ссылочным типом

Дополнительные сведения см. в разделе "Различия между модификируемыми и неизменяемыми аргументами" и различиями между передачей аргумента по значению и по ссылке.

Выбор механизма передачи

Необходимо тщательно выбрать механизм передачи для каждого аргумента.

Защита. При выборе между двумя механизмами передачи наиболее важным критерием является подверженность изменению вызываемых переменных. Преимущество передачи аргумента ByRef заключается в том, что процедура может возвращать значение вызывающему коду через этот аргумент. Преимущество передачи аргумента ByVal заключается в том, что он защищает переменную от изменения процедурой.
Производительность. Хотя механизм передачи может повлиять на производительность кода, разница обычно незначительна. Исключением из этого является тип значения, переданный ByVal. В этом случае Visual Basic копирует все содержимое аргумента. Таким образом, для большого типа данных, такого как структура, может быть более эффективно передавать его ByRef.

Для ссылочных типов копируется только указатель на данные (четыре байта на 32-разрядных платформах, восемь байтов на 64-разрядных платформах). Таким образом, аргументы значений типа String или Object можно передавать без ущерба для производительности.

Определение механизма передачи

Объявление процедуры указывает механизм передачи для каждого параметра. Вызывающий ByVal код не может переопределить механизм.

Если параметр объявлен с ByRef, вызывающий код может принудительно заставить механизм, ByVal заключив имя аргумента в скобки в вызове. Дополнительные сведения см. в разделе «Как: принудительно передать аргумент по значению».

Значение по умолчанию в Visual Basic — передавать аргументы по значению.

Передача аргумента по значению

Если вызывающий элемент кода, лежащий в основе аргумента, является неизменяемым элементом, объявите соответствующий параметр ByVal. Код не может изменить значение неизменяемого элемента.
Если базовый элемент является изменяемым, но не требуется, чтобы процедура могла изменить его значение, объявите параметр ByVal. Только вызывающий код может изменить значение изменяемого элемента, передаваемого по значению.

Когда передавать аргумент по ссылке

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

Пример

Описание

В следующем примере показано, когда передавать аргументы по значению и когда передавать их по ссылке. Процедура Calculate имеет параметры ByVal и ByRef. Учитывая процентную ставку, rateи сумму денег, debtзадача процедуры заключается в вычислении новой стоимости debt , которая является результатом применения процентной ставки к исходной стоимости debt. Так как debt это ByRef параметр, новый общий итог отражается в значении аргумента в вызывающем коде, соответствующем debt. Параметр rate является параметром ByVal , так как Calculate не должен изменять его значение.

Код

Module Module1

    Sub Main()
        ' Two interest rates are declared, one a constant and one a 
        ' variable.
        Const highRate As Double = 12.5
        Dim lowRate = highRate * 0.6

        Dim initialDebt = 4999.99
        ' Make a copy of the original value of the debt.
        Dim debtWithInterest = initialDebt

        ' Calculate the total debt with the high interest rate applied.
        ' Argument highRate is a constant, which is appropriate for a 
        ' ByVal parameter. Argument debtWithInterest must be a variable
        ' because the procedure will change its value to the calculated
        ' total with interest applied.
        Calculate(highRate, debtWithInterest)
        ' Format the result to represent currency, and display it.
        Dim debtString = Format(debtWithInterest, "C")
        Console.WriteLine("What I owe with high interest: " & debtString)

        ' Repeat the process with lowRate. Argument lowRate is not a 
        ' constant, but the ByVal parameter protects it from accidental
        ' or intentional change by the procedure. 

        ' Set debtWithInterest back to the original value.
        debtWithInterest = initialDebt
        Calculate(lowRate, debtWithInterest)
        debtString = Format(debtWithInterest, "C")
        Console.WriteLine("What I owe with low interest:  " & debtString)
    End Sub

    ' Parameter rate is a ByVal parameter because the procedure should
    ' not change the value of the corresponding argument in the 
    ' calling code. 

    ' The calculated value of the debt parameter, however, should be
    ' reflected in the value of the corresponding argument in the 
    ' calling code. Therefore, it must be declared ByRef. 
    Sub Calculate(ByVal rate As Double, ByRef debt As Double)
        debt = debt + (debt * rate / 100)
    End Sub

End Module