FileSystemObject读写文件
2018-06-17 17:11:31来源:未知 阅读 ()
下面的代码段将一个文本文件中的内容读入一个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->
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
- 取得WAV文件信息 2018-06-17
- VBCOM基础讲座之编译的实例选项 2018-06-17
- 利用API创建文件目录 2018-06-17
- 如何用TextBox打开和保存文件 2018-06-17
- 转换长短文件名 2018-06-17
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash