「VB.NET」CreateTextメソッドでファイルにテキストを書き込む

2013年6月22日2022年2月2日

関数
1.Public Function CreateText () As StreamWriter
新しいテキスト ファイルに書き込みを実行する StreamWriter を作成します。
戻り値
新しい StreamWriter。

2.Public Shared Function OpenText (path As String) As StreamReader
読み取り用の既存の UTF-8 エンコードされたテキスト ファイルを開きます。
戻り値
指定したパスの StreamReader。

使用例

Imports System.IO
Module Module1

    Public Sub Main()

        Dim filepath As String = "C:\study\vb\sample.txt"

        ' ファイルが存在しない場合は、新しいファイルが作成されます
        If Not File.Exists(filepath) Then
            ' ファイル作成
            Using sw As StreamWriter = File.CreateText(filepath)
                sw.WriteLine("Study")
                sw.WriteLine("Skill")
                sw.WriteLine("Become")
                sw.WriteLine("Smart")
            End Using
        End If

        Console.WriteLine("ファイルから内容を読む")
        ' ファイルを開いてデータを読む
        Using sr As StreamReader = File.OpenText(filepath)
            Do While sr.Peek() >= 0
                Console.WriteLine(sr.ReadLine())
            Loop
        End Using

        Console.ReadKey()
    End Sub

End Module

実行結果
1.「C:\study\vb\sample.txt」ファイルに以下の内容を書き込みました
Study
Skill
Become
Smart

2.コンソールに以下の内容が表示されます。
ファイルから内容を読む
Study
Skill
Become
Smart