Imports System.Collections.Generic
public class Test
public Shared Sub Main
Dim squares As Array = Array.CreateInstance(GetType(Integer), 11)
For i As Integer = 0 To 10
squares.SetValue(i * i, i)
Next i
For i As Integer = 0 To 10
Console.WriteLine(squares.GetValue(i).ToString)
Next i
End Sub
End class
0
1
4
9
16
25
36
49
64
81
100