vb中fso文本流跨行读取的问题

来源：百度知道 编辑：UC知道 时间：2024/05/25 13:18:11
一个有100行的文本文件，要从第50行开始按行读取到80行，请问各位高手用vb怎么实现？先谢谢了！！

set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("a.txt",1)
do while file.atendofstream<>true
n=file.readline:l=file.line-1
if l>=50 and l<=80 then s=s & n & vbcrlf
loop
file.close
msgbox s,4096,"50-80行的内容"

'VBS写的参考!