Imports System.Collections
Imports Microsoft.VisualBasic
Private Sub GetMinMaxAverage()
Console.WriteLine("Enter positive numbers slowly, enter -1 to stop")
i = Convert.ToInt32(Console.ReadLine())
Console.WriteLine("Please enter a positive number")
Console.WriteLine("Min: " & minValue & ", Max: " & maxValue & " , count: " & count & ", total: " & total & ", Average: " & average)
Dim numberList as New ArrayList