曼丁哥文翻譯

CreateTextFile 方式有以下幾個單位：

以下部分引用自 Visual Studio 6 MSDN 光碟

CreateTextFile 方式

Sub CreateAfile

    Dim fso as FileSystemObject
    Dim fid as TextStream

    Set fso = CreateObject("Scripting.FileSystemObject")
    Set fid = fso.CreateTextFile("c:testfile.txt", True)
    fid.WriteLine("This is a test.")
    fid.Close

End Sub

對於一個已經存在的 filename，如果 overwrite 引數是 False 或沒有提供，則會産生毛病 翻譯社

語法

下面 翻譯程式碼舉例申明如何使用 CreateTextFile 方式創立和開啟文字檔。

準備工作

豎立一個指定 翻譯檔名並且傳回一個用於該檔案讀寫的 TextStream 物件 翻譯社

描寫

object.CreateTextFile(filename[, overwrite[ 翻譯公司 unicode]])

1. 進入VB6 翻譯公司 點選 MENU / Project / References
2. 點選 Microsoft Scripting Runtime, 並肯定引用此 .dll 檔

請注意