' 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 字符并确保操作系统的本地化版本之间保持一致。