Read a complete line of text

Sub Main()

        Dim strLine As String
        Console.Write("Enter a line of text: ")
        strLine = Console.ReadLine
        Console.WriteLine()
        Console.WriteLine("You just entered: {0}", strLine)
    End Sub