Array of Structure : Structure Array « Class Module « VB.Net Tutorial

1. VB.Net Tutorial
2. Class Module
3. Structure Array

Structure Employee
    Dim strName As String
    Dim intSalary As Integer
End Structure


public class Test
   public Shared Sub Main
        Dim aryEmployees(15) As Employee
        Dim intCounter As Integer

        aryEmployees(0).strName = "J"
        aryEmployees(0).intSalary = 3
        aryEmployees(1).strName = "B"
        aryEmployees(1).intSalary = 6

        'Set other array elements here.

        aryEmployees(15).strName = "P"
        aryEmployees(15).intSalary = 1

        'Show the elements of the array.
        For intCounter = 0 To 15
            Console.WriteLine("Array element: " & intCounter & vbCrLf & _
                   "Name: " & aryEmployees(intCounter).strName & vbCrLf & _
                   "Salary: " & aryEmployees(intCounter).intSalary)
        Next intCounter
   End Sub


End class

Array element: 0
Name: J
Salary: 3
Array element: 1
Name: B
Salary: 6
Array element: 2
Name:
Salary: 0
Array element: 3
Name:
Salary: 0
Array element: 4
Name:
Salary: 0
Array element: 5
Name:
Salary: 0
Array element: 6
Name:
Salary: 0
Array element: 7
Name:
Salary: 0
Array element: 8
Name:
Salary: 0
Array element: 9
Name:
Salary: 0
Array element: 10
Name:
Salary: 0
Array element: 11
Name:
Salary: 0
Array element: 12
Name:
Salary: 0
Array element: 13
Name:
Salary: 0
Array element: 14
Name:
Salary: 0
Array element: 15
Name: P
Salary: 1