close

日文口譯價錢

以下部份援用自 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 或沒有供給，則會産生毛病。

單位 描述
object 需要引數。始終是一個 FileSystemObject 或 Folder 物件 翻譯名字 翻譯社
filename 需要引數 翻譯社字串運算式，它標識成立的檔案。
overwrite 選擇性引數。Boolean ，暗示一個已存在檔案是不是可被籠蓋。若是可被籠蓋其值為 True，其為 False 時沒法籠蓋。假如它被省略，則已存在檔案無法籠蓋。。-> 翻譯社|,-> 翻譯公司|的-> 翻譯
unicode 選擇性引數。Boolean ，表示檔案是作為一個 Unicode 檔案確立的還是作為一個 ASCII 檔案建立的。如果作為一個 Unicode 檔案建立，其為 True，作為一個 ASCII 檔案建立，其為 False。如果省略的話，則認為是一個 ASCII 檔案。

下面的程式碼舉例說明若何使用 CreateTextFile 方式創設和開啟文字檔 翻譯社

object.CreateTextFile(filename[, overwrite[, unicode]])

請留意

語法

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

準備工作

創設一個指定 翻譯檔名而且傳回一個用於該檔案讀寫 翻譯 TextStream 物件 翻譯社



本文來自: 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有關翻譯的問題歡迎諮詢天成翻譯社

arrow
arrow
    文章標籤
    翻譯社
    全站熱搜
    創作者介紹
    創作者 francix4062 的頭像
    francix4062

    francix4062@outlook.com

    francix4062 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄