读取和写入文件
以下示例将一行文本写入文件。

' Write text to a file 
Sub WriteTextToFile() 
Dim file As New System.IO.StreamWriter("c:test.txt") 
file.WriteLine("Here is the first line.") 
file.Close() 
End Sub 

以下示例将文件中的文本读取到一个字符串变量中，然后将该文本写到控制台。

Sub ReadTextFromFile() 
Dim file As New System.IO.StreamReader("c:test.txt") 
Dim words As String = file.ReadToEnd() 
Console.WriteLine(words) 
file.Close() 
End Sub 

以下示例在现有文件中添加文本。

Sub AppendTextToFile() 
Dim file As New System.IO.StreamWriter("c:test.txt",True) 
file.WriteLine("Here is another line.") 
file.Close() 
End Sub 

以下示例一次从文件中读取一行，然后将每行文本打印到控制台。

Sub ReadTextLinesFromFile() 
Dim file As New System.IO.StreamReader("c:test.txt") 
Dim oneLine As String 
oneLine = file.ReadLine() 
While (oneLine <> "") 
Console.WriteLine(oneLine) 
oneLine = file.ReadLine() 
End While 
file.Close() 
End Sub 

文件编码
默认情况下，StreamReader 和 StreamWriter 类都使用 UTF-8 编码。UTF-8 编码正确处理 Unicode 字符并确保操作系统的本地化版本之间保持一致。

可使用 StreamReader 自动检测文件的编码，或者将文件的编码指定为构造函数上的参数。

StreamWriter 在其构造函数上采用一个编码参数。如果指定编码，则 Visual Basic 写入文件以指示所使用的编码。


详细出处参考： http://www.jb51.net/article/15531.html