vb.net读写文本文件简单示例

写

Dim strFilePath As String =SaveFileDialog1.FileName
Dim sw As StreamWriter = New StreamWriter（strFilePath， True） 'true是指以追加的方式打开指定文件
For i = 0 To j
temp = i.ToString
sw.WriteLine（temp）
sw.Flush（）
Next
sw.Close（）
sw = Nothing

读

Dim line As String
Dim sr As StreamReader = New StreamReader（strPath， System.Text.Encoding.Default）
Do While sr.Peek（） > 0
line = sr.ReadLine（）
Loop
sr.Close（）
sr = Nothing '构造函数new
Public Sub New（Path， Encoding）