【VB.net】テキストの読み込み

ただいまお仕事中ですがｗｗ

現在、新部署での案件で設計中♪
今回はJavaのプログラム修正・VB6⇒.net3.5(VisualStudio2008)へのアップグレード！！

ちょっとしたメモ書きを残しておきます。

☆☆テキストの読み込み☆☆
[http://dobon.net/vb/dotnet/file/readfile.html]
●ストリームを使ってテキストファイルを読み込む
※１行ずつ読み込みます

。ReadLineメソッドで一行読み込み、Peekメソッドで末尾を確認します。
ReadLineメソッドはファイルを最後まで読み込むとnull（VB.NETではNothing）を返しますので、
これで末尾を判断することもできます。

なおReadLineメソッドが返す文字列には末尾の改行記号（キャリッジリターン、ラインフィード）が含まれませんので
注意してください。

[VB.NET]
'"C:\test.txt"をShift-JISコードとして開く
Dim sr As New System.IO.StreamReader("C:\test.txt", _
System.Text.Encoding.GetEncoding("shift_jis"))
'内容を一行ずつ読み込む
While sr.Peek() > -1
Console.WriteLine(sr.ReadLine())
End While
'閉じる
sr.Close()


●ストリームを使わず
[VB.NET]
'読み込むテキストファイル
Dim textFile As String = "C:\text.txt"
'文字コード(ここでは、Shift JIS)
Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding("shift_jis")

'テキストファイルの中身をすべて読み込む
Dim str As String = System.IO.File.ReadAllText(textFile, enc)

'行ごとの配列として、テキストファイルの中身をすべて読み込む
Dim lines As String() = System.IO.File.ReadAllLines(textFile, enc)

☆てぃーきゃパパ☆