2020年9月3日 星期四

Vb.net 讀寫到txt檔 [Write Read txt File]

1
Imports System.IO




1
2
3
4
5
6
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim FileReader As StreamReader
        FileReader = New StreamReader("C:\test.txt")
        TextBox1.Text = FileReader.ReadToEnd()
        FileReader.Close()
    End Sub

1
2
3
4
5
6
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim FileWriter As StreamWriter
 FileWriter = New StreamWriter("C:\test.txt", False)
 FileWriter.Write(TextBox1.Text)
 FileWriter.Close()
    End Sub

沒有留言:

張貼留言