Array passed By Reference : ByRef « Language Basics « VB.Net

Home
VB.Net
1.2D
2.Application
3.Class
4.Data Structure
5.Data Types
6.Database ADO.net
7.Development
8.Event
9.File Directory
10.Generics
11.GUI
12.Language Basics
13.LINQ
14.Network Remote
15.Security
16.Thread
17.Windows Presentation Foundation
18.Windows System
19.XML
20.XML LINQ
VB.Net Tutorial
VB.Net by API
VB.Net » Language Basics » ByRefScreenshots 
Array passed By Reference
Array passed By Reference
 
Imports System

Public Class MainClass

    Shared Sub Main(ByVal args As String())
      Dim As Integer
      ' declare array references
      Dim secondArray As Integer()
      Dim secondArrayCopy As Integer()

      ' allocate secondArray and copy its reference
      secondArray = New Integer() {123}
      secondArrayCopy = secondArray

      Console.WriteLine(vbCrLf & "Test passing array " & _
         "reference using ByRef.")
      Console.Write("Contents of secondArray before " & _
         "calling SecondDouble: ")

      ' print contents of secondArray before procedure call
      For i = To secondArray.GetUpperBound(0)
         Console.Write(secondArray(i" ")
      Next

      ' pass secondArray using ByRef
      SecondDouble(secondArray)

      Console.Write(vbCrLf & "Contents of secondArray " & _
         "after calling SecondDouble: ")

      ' print contents of secondArray after procedure call
      For i = To secondArray.GetUpperBound(0)
         Console.Write(secondArray(i" ")
      Next

      ' test whether the reference was changed by SecondDouble
      If secondArray Is secondArrayCopy Then
         Console.WriteLine(vbCrLf & "The references are " & _
            "equal.")
      Else
         Console.WriteLine(vbCrLf & "The references are " & _
            "not equal.")
      End If


    End Sub
   ' procedure modifies elements of array and assigns
   ' new reference (note ByRef)
   Shared Sub SecondDouble(ByRef array As Integer())
      Dim As Integer

      ' double contents of array
      For i = To array.GetUpperBound(0)
         array(i*= 2
      Next

      ' create new reference, assign it to array
      array = New Integer() {111213}
   End Sub ' SecondDouble
End Class

           
         
  
Related examples in the same category
1.Pass parameter By value or By ReferencePass parameter By value or By Reference
2.Object parameter passed by Value and by ReferenceObject parameter passed by Value and by Reference
3.Structure parameter passed by Value and by Reference
4.String parameter passed by Value and by ReferenceString parameter passed by Value and by Reference
5.Array parameter passed by Value and by ReferenceArray parameter passed by Value and by Reference
6.Modify Array Element By Reference Modify Array Element By Reference
7.To test reference type variables for Nothing values, use the Is operator or the IsNot operator.
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.