网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

VBS下AtEndOfLine属性的用法-创新互联

这篇文章主要讲解了“VBS下AtEndOfLine属性的用法”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“VBS下AtEndOfLine属性的用法”吧!

为洪江管理区等地区用户提供了全套网页设计制作服务,及洪江管理区网站建设行业解决方案。主营业务为成都网站设计、成都网站制作、外贸网站建设、洪江管理区网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

AtEndOfLine 属性

TextStream 文件中,如果文件指针指向行末标记,就返回True;否则如果不是只读则返回False

object.AtEndOfLine

object 应为 TextStream 对象的名称。

说明

AtEndOfLine 属性仅应用于以读方式打开的TextStream 文件,否则会出现错误。

下列代码举例说明如何使用AtEndOfLine 属性:

Function ReadEntireFile(filespec)  Const ForReading = 1  Dim fso, theFile, retstring  Set fso = CreateObject("Scripting.FileSystemObject")  Set theFile = fso.OpenTextFile(filespec, ForReading, False)  Do While theFile.AtEndOfLine <> True    retstring = theFile.Read(1)  Loop  theFile.Close  ReadEntireFile = retstringEnd Function

感谢各位的阅读,以上就是“VBS下AtEndOfLine属性的用法”的内容了,经过本文的学习后,相信大家对VBS下AtEndOfLine属性的用法这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联网站建设公司,,小编将为大家推送更多相关知识点的文章,欢迎关注!


文章题目:VBS下AtEndOfLine属性的用法-创新互联
分享链接:http://bjjierui.cn/article/pgesg.html

其他资讯