「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
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
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行目:名古屋