VB.NET One Dimentional Array
Dim ar(4) As Integer
For i = 0 To 4
Console.Write("Enter {0} 'st number>> ", i + 1)
ar(i) = Val(Console.ReadLine())
Next
For i = 0 To 4
Console.Write(" {0},", ar(i))
Next