国产探花免费观看_亚洲丰满少妇自慰呻吟_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->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 湾仔区| 桃园市| 万荣县| 边坝县| 名山县| 邮箱| 商河县| 仁怀市| 东丽区| 齐齐哈尔市| 沧州市| 贵溪市| 金溪县| 芦溪县| 襄汾县| 留坝县| 万年县| 临潭县| 镇雄县| 德清县| 呈贡县| 太仆寺旗| 海淀区| 宜兰市| 阿拉善盟| 静安区| 五原县| 定远县| 赣州市| 昌江| 沙田区| 会同县| 汉寿县| 柘城县| 长葛市| 东海县| 正安县| 钟祥市| 张北县| 滕州市| 和林格尔县|