vb读取远程文本文件指定行内容，

1、用WebBrowser

控件打开该网站

2、找到这个文本文件并打开

3、逐行读取，直到第9行，保存在一个字符串中

4、加工这个字符串得到网址

假设你要读取的文件是"c:\1.txt".

dim

s

as

string

open

"c:\1.txt"

for

input

as

#1

if

not

eof(1)

then

line

input

#1,s

text1=s

'读取到text1

if

not

eof(1)

then

line

input

#1,s

text2=s

'读取到text2

close

#1

---