国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

FileSystemObject讀寫文件

2019-11-18 17:39:56
字體：大 中 小
來源：轉載
供稿：網友
你可以通過調用OpenTextFile方法來讀取一個文本文件。OpenTextFile方法的第一個參數是指定打開的文件名；第二個參數是指定文件是讀取，增添，或者寫入；第三個參數決定當指定的文件名不存在時新的文件是否要建立；第四個參數指定文件的格式是ASCII還是Unicode。這一方法返回的是一個TextStream對象。

　　下面的代碼段將一個文本文件中的內容讀入一個TextBox控件。TextStream中的ReadAll方法用于讀出文件的內容，然后使用Close方法來關閉文件。

DimobjfsoAsFileSystemObject
DimobjTextAsTextStream

SetobjFSO=NewFileSystemObject

SetobjText=objFSO.OpenTextFile(App.Path&"/temp.txt",_
ForReading,False,TristateUseDefault)
Text1.Text=objText.ReadAll()
CallobjText.Close

　　為了能夠在一個文本文件中寫入內容，可以先打開文件，然后使用TextStream中的Write方法輸入需要的值。

SetobjText=objFSO.OpenTextFile(App.Path&"/temp.txt",_
ForWriting,False,TristateUseDefault)
CallobjText.Write(Text1.Text)
CallobjText.Close->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 甘南县| 准格尔旗| 张家界市| 白朗县| 广丰县| 定安县| 襄城县| 双江| 博野县| 永安市| 阳新县| 杭锦旗| 金昌市| 灌南县| 滦平县| 宾川县| 鸡泽县| 惠水县| 江津市| 金湖县| 大竹县| 双辽市| 吕梁市| 高邑县| 万安县| 积石山| 体育| 阿图什市| 湖北省| 道孚县| 陆川县| 临清市| 西乌珠穆沁旗| 黔江区| 峨山| 军事| 大埔区| 探索| 玉山县| 临武县| 张家界市|