'FormにButton2つとTextBox2つを配置 Public Class Form1 Private fileData As String() Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'ファイルを読み込んで行ごとに配列に格納 fileData = System.IO.File.ReadAllLines("C:\Hoge.txt") '配列の1,2番目の内容をテキストボックスにセット TextBox1.Text = fileData(0) TextBox2.Text = fileData(1) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click '配列の1,2番目の内容をテキストボックスの値に変更 fileData(0) = TextBox1.Text fileData(1) = TextBox2.Text '配列の中身を上書き書き込み System.IO.File.WriteAllLines("C:\Hoge.txt", fileData) End Sub End Class