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

Статья
03/05/2024

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

Различия

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

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

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

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

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

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

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

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

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

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

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

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

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

Передача аргумента по ссылке

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

Пример

Description

В следующем примере показано, когда передавать аргументы по значению и когда передавать их по ссылке. Процедура Calculate имеет как параметр ByValByRef , так и параметр. Учитывая процентную ставку, 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