VB中读取指定的第N行,怎么办

VB中读取指定的第N行,怎么办,第1张

Dim Count As Integer

Dim strTem

Open "C:\test.txt" For Input As #1

For Count = 1 To n 'n是要读的第几行

Line Input #1, strTem

Next Count

Line Input #1, strTem '此时的strTem就是你要读的信息

Close #1

对于这种文件没有更好的方法,看情况,可以考虑用数据库,可以移动n行

dim i as long,j as long

dim js as string

i=50 '假设从第50行开始

open 路径 for input as #1

do while eof(1)=false and j<i-1

j=j+1

line input #1,js

loop

if j=i-1 then

line input #1,js

else

end if

close #1


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/6771902.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-03-28
下一篇 2023-03-28

发表评论

登录后才能评论

评论列表(0条)

保存