下面的程式碼舉例說明如何利用 CreateTextFile 方式豎立和開啟文字檔。
1. 進入VB6翻譯社 點選 MENU / Project / References
2. 點選 Microsoft Scripting Runtime, 並確定援用此 .dll 檔
單位 | 描寫 |
object | 必要引數。始終是一個 FileSystemObject 或 Folder 物件的名字。 |
filename | 需要引數。字串運算式,它標識成立的檔案翻譯 |
overwrite | 選擇性引數。Boolean ,透露表現一個已存在檔案是不是可被籠蓋。如果可被覆蓋其值為 True,其為 False 時沒法籠蓋。如果它被省略,則已存在檔案無法籠蓋翻譯 |
unicode | 選擇性引數。Boolean ,示意檔案是作為一個 Unicode 檔案建立的仍是作為一個 ASCII 檔案成立的翻譯假如作為一個 Unicode 檔案創設,其為 True,作為一個 ASCII 檔案成立,其為 False。如果省略的話,則認為是一個 ASCII 檔案。 |
以下部分引用自 Visual Studio 6 MSDN 光碟
CreateTextFile 方式
語法
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 或沒有供給,則會産生毛病。
豎立一個指定的檔名並且傳回一個用於該檔案讀寫的 TextStream 物件翻譯
請注意
描寫
object.CreateTextFile(filename[翻譯社 overwrite[, unicode]])
準備工作
以下內文出自: http://blog.xuite.net/hwtang/notes/23618266-VB%E5%BB%BA%E7%AB%8B%E6%96%87%E5%AD%97%E6%AA%94%E7%9A%84有關各國語文翻譯公證的問題歡迎諮詢天成翻譯公司02-77260931
文章標籤
全站熱搜