vbs 读取txt是读取特定的行

读取第三行的内容:
Set fso = CreateObject("scripting.filesystemobject")
path="A.TXT文件的路径"
Set A=fso.OpenTextFile(path,1)
For i=1 To 2
A.ReadLine
Next
line=A.ReadLine
MsgBox "第三行为: "&line

第四行的第2个到第5个字符:

Set fso = CreateObject("scripting.filesystemobject")
path="A.TXT文件的路径"
Set A=fso.OpenTextFile(path,1)
For i=1 To 3
A.ReadLine
Next
A.Read(1)
str=a.Read(4)
MsgBox "第四行的第2个到第5个字符的内容为: "&str
posted @ 2014-07-10 23:12  狂师  阅读(2699)  评论(0编辑  收藏  举报