Есть ли способ указать, что переменная передается ByRef в VB?

Есть ли способ указать, что переменная передается ByRef в VB? Я знаю, что в C# у них есть ключевое слово ref, которое должно присутствовать как в заголовке функции, так и в вызывающем коде. Имеет ли VB эквивалент?Есть ли способ указать, что переменная передается ByRef в VB?

Например, моя функция выглядит следующим образом

private function add_one(byRef value)as Boolean

код вызова будет выглядеть следующим образом

increment_was_successful = add_one(ByRef value)

источник

2015-04-17 andrew

Я уверен, что вы просто используете 'ByRef' вместо' ByVal' в методе, а затем просто передаете переменную без ключевых слов - например, increment_was_successful = add_one (value) '. – Tim

@ Подумайте, вы правы, вам не нужно ключевое слово при вызове метода, но я надеялся, что вы это укажете. Это повышает читаемость при просмотре кода. возможно, читаемость не является правильным термином, я бы просто посмотрел ее явно, поэтому нет путаницы. – andrew

Вы можете перестать искать, эквивалентный синтаксис не существует. У него было какое-то несвязанное использование в дни VB6, используемое для генерации значения указателя, а не переносимого другим способом в VB.NET. –

-1

Оказывается, VB просто не поддерживает эту форму.

increment_was_successful = add_one(ByRef value)

Вы оставили вызов функции без какого-либо показателя, что она передается ByRef

increment_was_successful = add_one(value)

источник

2015-04-18 00:23:36 andrew

VB.Net поддерживает 'ByRef'. Это необходимо, так как остальная часть семейства .Net делает и CLR. – StarPilot

@StarPilot Вы находите мое новое решение приемлемым? Я знаю, что .net поддерживает то, что в основном указатели, я просто искал конкретный формат. То, как программа C# .net использовала параметр 'out' для эмуляции указателя, что-то вроде этого' increment_was_successful = add_one (out value) ' – andrew

Чтобы прояснить мой запутанный комментарий ...

ByRef и ByVal используются в определении параметры суб или функции - не на вызов.

Вот код своего рода следует О.П. вопрос:

Dim orgVal As Integer = 1 

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
    Dim increment_was_successful As Boolean 
    increment_was_successful = add_one(orgVal) 
    MsgBox(increment_was_successful & " - " & orgVal) 
End Sub 

Private Function add_one(ByRef value As Integer) As Boolean 
    Const limit As Integer = 3 
    If value <= limit - 1 Then 
     value += 1 
     Return True 
    Else 
     Return False 
    End If 
End Function

Обратите внимание на ByRef в определении функции. Если вы измените ByRef на ByVal, вы увидите, что orgVal никогда не меняет значение 'value' является локальным для add_one, а не указателем (ByRef) на orgVal.

источник

2015-04-23 22:05:33 rheitzman

Есть ли способ указать, что переменная передается ByRef в VB?

ответ

Смежные вопросы