Modify Array Element By Reference

 
Imports System

Public Class MainClass

    Shared Sub Main(ByVal args As String())
      Dim array1 As Integer() = New Integer() {1, 2, 3, 4, 5}
      Dim i As Integer

      Console.WriteLine( "The values of the original array are:" & vbCrLf )

      ' display original elements of array1
      For i = 0 To array1.GetUpperBound(0)
         Console.WriteLine(  "  " & array1(i) )
      Next

      ' array element passed by reference
      ModifyElementByRef(array1(3))

      Console.WriteLine(  vbCrLf & "array1(3) after " & _
         "ModifyElementByRef: " & array1(3) )

    End Sub

   Shared Sub ModifyElementByRef(ByRef element As Integer)

      Console.WriteLine(  vbCrLf & "Value received in " & _
         "ModifyElementByRef: " & element )
      element *= 2
      Console.WriteLine(  vbCrLf & "Value calculated in " & _
         "ModifyElementByRef: " & element )
   End Sub ' ModifyElementByRef


End Class

Related examples in the same category

1.	Pass parameter By value or By Reference
2.	Object parameter passed by Value and by Reference
3.	Structure parameter passed by Value and by Reference
4.	String parameter passed by Value and by Reference
5.	Array parameter passed by Value and by Reference
6.	Array passed By Reference
7.	To test reference type variables for Nothing values, use the Is operator or the IsNot operator.

Modify Array Element By Reference : ByRef « Language Basics « VB.Net

Related examples in the same category