dandandan 发表于 2005-6-2 18:02:00

[VBA][求助]如何用VB提取文本文件中的某一行内容？多谢大家！

[求助]如何用VB提取文本文件中的某一行内容？多谢大家！

wyj7485 发表于 2005-6-2 18:16:00

Open       "d:\test.txt" For Input As #1       ' 打开文件。<BR>Do While Not EOF(1)                       ' 循环至文件尾。<BR>                       Input #1, MyString               ' 将数据读入变量。<BR>                        Loop<BR>Close #1                       ' 关闭文件。

dandandan 发表于 2005-6-2 19:33:00

多谢！可是我刚才试了一下，读不出来呀？我指的是读取其中几行的内容

mikewolf2k 发表于 2005-6-2 19:58:00

只能一行行的读，到了你要的地方把内容读出来。

dandandan 发表于 2005-6-2 20:04:00

实在不好意思，能举个例子吗？

dyheng 发表于 2005-6-2 20:27:00

Dim i As Integer, myText As String<BR>Open "d:\test.txt" For Input As #1               ' 打开文件。<BR>Do While Not EOF(1)                       ' 循环至文件尾。<BR>                       i = i + 1<BR>               If i = 5 Then Line Input #1, mystring: myText = myText &amp; mystring ' 将数据读入变量。<BR>               Loop<BR>Close #1                       ' 关闭文件。<BR>

dandandan 发表于 2005-6-3 09:32:00

非常感谢你们的帮助！谢谢！
页: [1]
查看完整版本: [VBA][求助]如何用VB提取文本文件中的某一行内容？多谢大家！