テキストファイルの書き込み方法について記載します。

File.WriteAllLines メソッドを使用し 文字列をテキストファイルに書き込む

Dim str As String = "AAA"

Dim sFilePath As String = "C:\work\myfile.txt"
 
'文字列をテキストファイルに全て書き込む
System.IO.File.WriteAllText(sFilePath, str, System.Text.Encoding.Default)

 

File.WriteAllLines メソッドを使用し 文字列配列をテキストファイルに書き込む

Dim lines As String() = {"AAA", "BBB", "CCC"}

Dim sFilePath As String = "C:\work\myfile.txt"

'配列の要素ごとに、改行を追加してテキストファイルに書き込む
System.IO.File.WriteAllLines(sFilePath, lines, System.Text.Encoding.Default)

 

StreamWriter.Write メソッドを使用し 文字列をテキストファイルに書き込む

Dim str As String = "AAA"

Dim sFilePath As String = "C:\work\myfile.txt"

'文字列をテキストファイルに全て書き込む
Dim sw As New System.IO.StreamWriter(sFilePath, False, System.Text.Encoding.Default)
sw.Write(str)
sw.Close()

※StreamWriter()の２番目のパラメータは、追加、上書き、を指定します。

 

StreamWrite.WriteLine メソッドを使用し 文字列配列をテキストファイルに書き込む

Dim lines As String() = {"AAA", "BBB", "CCC"}

Dim sFilePath As String = "C:\work\myfile.txt"

Dim sw As New System.IO.StreamWriter(sFilePath, False, System.Text.Encoding.Default)

'配列の要素ごとに、改行を追加してテキストファイルに書き込む
For Each s As String In lines
    sw.WriteLine(s)
Next
sw.Close()

 

 

テキストファイルの読み込み方法について記載します。

File.ReadAllLines メソッドを使用し Stringとして読み込む

Dim sFilePath As String = "C:\work\myfile.txt"

'テキストファイルを全て読み込む
Dim str As String = System.IO.File.ReadAllText(sFilePath, System.Text.Encoding.Default)

 

File.ReadAllLines メソッドを使用し 文字列配列に読み込む

Dim sFilePath As String = "C:\work\myfile.txt"

'行ごとに配列として、テキストファイルを読み込む
Dim lines As String() = System.IO.File.ReadAllLines(sFilePath, System.Text.Encoding.Default)

 

StreamReader.ReadToEnd メソッドを使用し Stringとして読み込む

Dim sr As New System.IO.StreamReader("C:\work\myfile.txt", System.Text.Encoding.Default)
Dim str As String = sr.ReadToEnd()
sr.Close()

MessageBox.Show(str)

 

StreamReader.ReadLine メソッドを使用し List<Strung>に読み込む

Dim lines As New List(Of String)
Dim sr As New System.IO.StreamReader("C:\work\myfile.txt", System.Text.Encoding.Default)

While (SR.Peek() >= 0)
    Dim s As String = SR.ReadLine()
    lines.Add(s)
End While
SR.Close()