Dim value, total As Integer
Console.Writeline("How many numbers do you want? - max 20")
value = Console.readline()
Dim mynumbers(value) As Integer
Console.Writeline("Input a number")
mynumbers(n) = Console.readline()
total = total + mynumbers(n)
Console.writeline("Your total is " & total)