Cómo: Cambiar el valor de un argumento de procedimiento (Visual Basic)

Artículo
06/08/2015

Cuando llama a un procedimiento, cada argumento proporcionado se corresponde con uno de los parámetros definidos en el procedimiento. En algunos casos, el código del procedimiento puede cambiar el valor subyacente a un argumento en el código de llamada. En otros casos, el procedimiento sólo puede cambiar la copia local de un argumento.

Cuando llama al procedimiento, Visual Basic hace una copia local de cada argumento transferido ByVal (Visual Basic). En cada argumento transferido ByRef (Visual Basic), Visual Basic proporciona al código del procedimiento una referencia directa al elemento de programación subyacente al argumento en el código de llamada.

Si el elemento subyacente del código de llamada es un elemento modificable y el argumento se transfiere ByRef, el código del procedimiento puede utilizar la referencia directa para cambiar el valor del elemento en el código de llamada.

Cambiar el valor subyacente

Para cambiar el valor subyacente de un argumento del procedimiento en el código de llamada

En la declaración del procedimiento, especifique ByRef (Visual Basic) en el parámetro que se corresponda con el argumento.
En el código de llamada, transfiera un elemento de programación modificable como argumento.
En el código de llamada, no incluya el argumento entre paréntesis en la lista de argumentos.
En el código de procedimiento, utilice el nombre de parámetro para asignar un valor al elemento subyacente del código de llamada.

Vea el ejemplo siguiente para consultar una demostración.

Cambiar las copias locales

Si el elemento subyacente del código de llamada no es un elemento modificable o si el argumento se transfiere ByVal, el procedimiento no puede cambiar su valor en el código de llamada. Sin embargo, el procedimiento puede cambiar la copia local de este tipo de argumento.

Para cambiar la copia de un argumento del procedimiento en el código del procedimiento

En la declaración del procedimiento, especifique ByVal (Visual Basic) en el parámetro que se corresponda con el argumento.

O bien

En el código de llamada, incluya el argumento entre paréntesis en la lista de argumentos. Esto hace que Visual Basic transfiera el argumento por valor, aun cuando el parámetro correspondiente especifique ByRef.
En el código del procedimiento, utilice el nombre de parámetro para asignar un valor a la copia local del argumento. El valor subyacente del código de llamada no se modifica.

Ejemplo

En el siguiente ejemplo se muestran dos procedimientos que toman una variable de matriz y operan con sus elementos. El procedimiento increase sencillamente suma una unidad a cada elemento. El procedimiento replace asigna una nueva matriz al parámetro a() y, a continuación, suma una unidad a cada elemento.

Public Sub increase(ByVal a() As Long)
    For j As Integer = 0 To UBound(a)
        a(j) = a(j) + 1
    Next j
End Sub

Public Sub replace(ByRef a() As Long)
    Dim k() As Long = {100, 200, 300}
    a = k
    For j As Integer = 0 To UBound(a)
        a(j) = a(j) + 1
    Next j
End Sub

Dim n() As Long = {10, 20, 30, 40}
Call increase(n)
MsgBox("After increase(n): " & CStr(n(0)) & ", " & 
    CStr(n(1)) & ", " & CStr(n(2)) & ", " & CStr(n(3)))
Call replace(n)
MsgBox("After replace(n): " & CStr(n(0)) & ", " & 
    CStr(n(1)) & ", " & CStr(n(2)) & ", " & CStr(n(3)))

La primera llamada a MsgBox muestra "After increase(n): 11, 21, 31, 41". Dado que la matriz n es un tipo de referencia, replace puede cambiar sus miembros, aunque el mecanismo para transferir argumentos es ByVal.

La segunda llamada a MsgBox muestra "After replace(n): 101, 201, 301". Dado que n se transfiere ByRef, replace puede modificar la variable n en el código de llamada y asignarle una nueva matriz. Como n es un tipo de referencia, replace también puede cambiar sus miembros.

Puede evitar que el procedimiento modifique la propia variable en el código de llamada. Vea Cómo: Proteger un argumento de procedimiento para que no se realicen cambios de valor (Visual Basic).

Compilar el código

Cuando se pasa una variable por referencia, debe utilizarse la palabra clave ByRef para especificar este mecanismo.

En Visual Basic, los argumentos se pasan por valor de forma predeterminada. Sin embargo, es una práctica de programación recomendable incluir la palabra clave ByVal (Visual Basic) o ByRef (Visual Basic) con cada parámetro declarado. De este modo, el código resulta más fácil de leer.

Seguridad

Existe siempre el riesgo potencial de permitir que un procedimiento cambie el valor subyacente a un argumento en el código de llamada. Asegúrese de que tiene previsto que este valor se modifique y prepárese para comprobar su validez antes de utilizarlo.