ByVal (Visual Basic)

Especifica se um argumento é passado by value de modo que o procedimento ou a propriedade chamado não pode alterar o valor de uma variável subjacente ao argumento no código de chamada. Se nenhum modificador for especificado, ByVal será o padrão.

Observação

Como ele é o padrão, você não precisa especificar explicitamente a palavra-chave ByVal em assinaturas de método. Ele tende a produzir um código barulhento e muitas vezes faz com que a palavra-chave ByRef não padrão seja negligenciada.

Comentários

O modificador ByVal pode ser usado nestes contextos:

Instrução Declare

Instrução Function

Instrução Operator

Instrução Property

Instrução Sub

Exemplo

O exemplo a seguir demonstra o uso do mecanismo para passar argumentos do parâmetro ByVal com um argumento de tipo de referência. No exemplo, o argumento é c1, uma instância da classe Class1. ByVal impede que o código nos procedimentos altere o valor subjacente do argumento de referência, c1, mas não protege os campos e as propriedades acessíveis de c1.

Module Module1

    Sub Main()

        ' Declare an instance of the class and assign a value to its field.
        Dim c1 As New Class1()
        c1.Field = 5
        Console.WriteLine(c1.Field)
        ' Output: 5

        ' ByVal does not prevent changing the value of a field or property.
        ChangeFieldValue(c1)
        Console.WriteLine(c1.Field)
        ' Output: 500

        ' ByVal does prevent changing the value of c1 itself. 
        ChangeClassReference(c1)
        Console.WriteLine(c1.Field)
        ' Output: 500

        Console.ReadKey()
    End Sub

    Public Sub ChangeFieldValue(ByVal cls As Class1)
        cls.Field = 500
    End Sub

    Public Sub ChangeClassReference(ByVal cls As Class1)
        cls = New Class1()
        cls.Field = 1000
    End Sub

    Public Class Class1
        Public Field As Integer
    End Class

End Module

Confira também