Console.ReadLine reads the next line of characters from the standard input stream.
Module Example Public Sub Main() Dim line As String
Console.WriteLine("Enter one or more lines of text (press CTRL+Z to exit):")
Console.WriteLine()
Do
Console.Write(" ")
line = Console.ReadLine() If line IsNot Nothing Then Console.WriteLine(" " + line)
Loop While line IsNot Nothing End Sub End Module