読み込んだテキストを1行ずつ処理したい

Imports System
Imports System.IO

Class ReadAllLines
    Shared Sub Main()
        ' シフトJISのファイルの読み込み
        Dim lines1 As String() = File.ReadAllLines("shiftjis.txt", System.Text.Encoding.GetEncoding("Shift_JIS"))
        ' UTF-8のファイルの読み込み
        Dim lines2 As String() = File.ReadAllLines("utf8.txt")
    End Sub
End Class