Imports System.IO
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, _
		ByVal e As System.EventArgs) Handles Button1.Click
        Try
            Dim line As String
            Dim readFile As System.IO.TextReader = New _
					StreamReader("C:\Test1.txt")
            line = readFile.ReadToEnd()
            MsgBox(line)
            readFile.Close()
            readFile = Nothing
        Catch ex As IOException
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class