华南俳烁实业有限公司

　　讀取和寫(xiě)入文件

　　以下示例將一行文本寫(xiě)入文件。

　　' 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

　　以下示例將文件中的文本讀取到一個(gè)字符串變量中，然后將該文本寫(xiě)到控制臺(tái)。

　　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

　　以下示例在現(xiàn)有文件中添加文本。

　　Sub AppendTextToFile()

　　Dim file As New System.IO.StreamWriter("c:test.txt", True)

　　file.WriteLine("Here is another line.")

　　file.Close()

　　End Sub

　　以下示例一次從文件中讀取一行，然后將每行文本打印到控制臺(tái)。

　　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

　　文件編碼

　　默認(rèn)情況下，StreamReader 和 StreamWriter 類(lèi)都使用 UTF-8 編碼。UTF-8 編碼正確處理 Unicode 字符并確保操作系統(tǒng)的本地化版本之間保持一致。

　　可使用 StreamReader 自動(dòng)檢測(cè)文件的編碼，或者將文件的編碼指定為構(gòu)造函數(shù)上的參數(shù)。

　　StreamWriter 在其構(gòu)造函數(shù)上采用一個(gè)編碼參數(shù)。如果指定編碼，則 Visual Basic 寫(xiě)入文件以指示所使用的編碼。