Dim i As Integer
Console.WriteLine("Enter an Integer")
i = Console.ReadLine()