' Visual Basic 2008 9.0 .NET Examples - Arguments - ByVal and ByRef - Procedures and Functions : 
Module Example5
    Sub Main()
        Dim value As Integer = 5
        MultiplyBy10(value)
        Console.WriteLine("Main value : " & value)
        '
        MultiplyBy10(value + 1)
        Console.WriteLine("Main value : " & value)
    End Sub
    Sub MultiplyBy10(ByRef value As Integer)
        value *= 10
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.