【VB.NET】テキストファイルの内容を読み込む方法

テキストファイルの読込方法の例です。
全行読込する場合と１行ずつ読込する場合の２種類の例紹介します。

ファイル「test.txt」の配置場所は、実行ファイルと同じフォルダーです。

Imports System.IO
Imports System.Text

Module Module1
    Sub Main()

        Try
            '全行読込
            Using sr As New StreamReader("test.txt",
                              Encoding.GetEncoding("Shift_JIS"))

                Dim Text = sr.ReadToEnd()

                Console.Write(Text)

            End Using
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

    End Sub
End Module

Imports System.IO
Imports System.Text

Module Module1
    Sub Main()

        Try
            Dim al As New ArrayList
            Dim line As String = String.Empty

            '一行づつ読込
            Using sr As New StreamReader("test.txt",
                                         Encoding.GetEncoding("Shift_JIS"))

                line = sr.ReadLine()

                Do Until line Is Nothing
                    al.Add(line)
                    line = sr.ReadLine()
                Loop

                For i As Integer = 0 To al.Count - 1
                    Console.WriteLine(al.Item(i))
                Next i

            End Using

        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

    End Sub
End Module