「VB.NET」Using 文でファイルの文字を読み込む

書式
Using 変数名 As New StreamReader(ファイル名,Encoding.GetEncoding(“UTF-8") )
処理コード
End Using
関数
Public Overrides Function ReadToEnd () As String
ストリームの現在位置から末尾までのすべての文字を読み込みます。
使用例

Imports System.IO
Imports System.Text

Module Module1

    Sub Main()

        'String型変数の宣言
        Dim fileName As String = "C:\study\testlog.txt"
        Dim rte As String

        ' Using文でファイルオープン
        Using streamreader As New StreamReader(fileName, Encoding.GetEncoding("UTF-8"))
            Console.WriteLine("ファイル" + fileName + "をオープンしました")

            'ストリームの現在位置から末尾までの全ての文字を読み込む
            rte = streamreader.ReadToEnd()
        End Using

        Console.WriteLine(rte)

        Console.ReadKey()
    End Sub

End Module

実行結果
ファイルC:\study\testlog.txtをオープンしました
1行目:東京
2行目:大阪
3行目:名古屋

VB.net

Posted by arkgame