將字串資料寫入文字檔案的範例程式 [2008-07-20]

        ' Begin_[2008_07_20_MM_12_44_29]
        ' Comments by WeiJin Tang (湯偉晉) :
        '   將字串資料寫入文字檔案的範例程式
        '  
        ' [2008-07-20-MM-12-10-10]
        ' 宣告一個類別為 [StreamWriter] 的物件，並且取名為 [myStreamWriter]
        ' Declare an instance of StreamWriter to write text to a file.
        Dim myStreamWriter As StreamWriter

        ' 路徑的名稱
        ' Folder Path
        Dim FP As String
        FP = "C:\WeiJin Tang\Output folder"

        ' 檔案名稱
        ' File Name
        Dim FN As String
        FN = "My first text file.txt"

        ' 完整的檔案名稱
        ' Full Path File Name
        Dim FPFN As String
        FPFN = System.IO.Path.Combine(FP, FN)

        ' 在記憶體中新增一個 [StreamWriter] 的物件，並且將它連結到硬碟中檔案名稱為FPFN的檔案
        ' Create an instance of StreamWriter to write text to a file.
        myStreamWriter = New StreamWriter(FPFN)

        ' Begin_[2008_07_20_MM_12_38_48]
        ' Comments by WeiJin Tang (湯偉晉) :
        '   將資料寫入 myStreamWriter 裡面
        '  
        With myStreamWriter
            .Write("The date is: ")
            .WriteLine(DateTime.Now)
            .WriteLine()

            ' Add some text to the file.
            .Write("時間就是你的生命")
            .WriteLine()
        End With
        '  
        ' End_[2008_07_20_MM_12_38_48]

        ' 將 myStreamWriter 關閉，以釋放它所使用到的系統資源
        ' close myStreamWriter to fully release the resources used by this StreamWriter object
        myStreamWriter.Close()
        '  
        ' End_[2008_07_20_MM_12_44_29]