ファイルを読み込んで一行ずつに分けるときに、
改行コードによらずにわける方法です。
改行コードがわかっているなら
System.String.Splitを使えばよいですが、
わからない場合は、System.IO.StringReaderを使います。
        Dim objFile As System.IO.StreamReader
        Dim objSR As System.IO.StringReader
        '読み込むファイルのパス
        Dim sFilePath As String
        'ファイルの内容
        Dim sContents As String
        '各行の文字列
        Dim sLine As String
       
        'ファイルを読み込む(Encodingはファイルにあわせる)
        objFile = New System.IO.StreamReader(sFilePath, System.Text.Encoding.GetEncoding(932))
        'ファイル内の文字列を全て取得する
        sContents = objFile.ReadToEnd
        'StringReaderで読み込む
        objSR = New System.IO.StringReader(sContents)
        '一行ずつ読み込む
        Do
            sLine = objSR.ReadLine()
            If sLine Is Nothing Then
                '空の行は
                'sLine = ""
                'なので、ここでは引っかからない
                Exit Do
            End If
        Loop
これで、ファイルの内容を一行ずつ最後まで読み取ることができます。
この記事へのコメント
コメントを書く
この記事へのTrackBack URL
http://blog.sakura.ne.jp/tb/8871361
http://blog.sakura.ne.jp/tb/8871361