Module Module1
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
End Module
Enter a line of text: a line
You just entered: a line