ファイルからコード指定で行単位読み込み

テキストファイルから文字コードを指定して行単位で読み込みたい場合、たとえばShift_JISなら、

Dim Reader As New StreamReader(SourceFile, Encoding.GetEncoding("Shift_JIS"))

で作成したオブジェクトを使う。
FileStreamを使うと、バイト配列にバイト単位で読み込む必要がある。