Permalink
Fetching contributors…
Cannot retrieve contributors at this time
22 lines (20 sloc) 608 Bytes
' <Snippet3>
Imports System
Imports System.IO
Class Test
Public Shared Sub Main()
Try
' Open the file using a stream reader.
Using sr As New StreamReader("TestFile.txt")
Dim line As String
' Read the stream to a string and write the string to the console.
line = sr.ReadToEnd()
Console.WriteLine(line)
End Using
Catch e As Exception
Console.WriteLine("The file could not be read:")
Console.WriteLine(e.Message)
End Try
End Sub
End Class
' </Snippet3>