Use For Each to loop through Array : For Each « Statements « VB.Net Tutorial






Option Strict On
 Imports System

 Public Class Employee
     Private empID As Integer
     Public Sub New(ByVal empID As Integer)
         Me.empID = empID
     End Sub 

     Public Overrides Function ToString( ) As String
         Return empID.ToString( )
     End Function 
 End Class 
 
 
 Class Tester

     Shared Sub Main( )
    
         Dim intArray( ) As Integer
         Dim empArray( ) As Employee
         intArray = New Integer(5) {}
         empArray = New Employee(3) {}
    
         Dim i As Integer
         For i = 0 To empArray.Length - 1
             empArray(i) = New Employee(i + 5)
         Next i
    
         Console.WriteLine("The Integer array...")
         Dim intValue As Integer
         For Each intValue In intArray
             Console.WriteLine(intValue.ToString( ))
         Next
    
         Console.WriteLine("The employee array...")
         Dim e As Employee
         For Each e In empArray
             Console.WriteLine(e)
         Next
     End Sub 'Run
 End Class
The Integer array...
0
0
0
0
0
0
The employee array...
5
6
7
8








4.7.For Each
4.7.1.Use For Each to loop through Array
4.7.2.For Each with Collection