*****文本文件操作问题*****

Question

dim tagname(1000)
    MYTXT="ABCD"
    tag_sum = 1
    Open "tags.txt" For Input Access Read Lock Read As #1     ' 打开输入文件。
    Do While Not EOF(1)   ' 循环至文件尾。
       Input #1, tagname(tag_sum)   ' 将数据读入变量。
       IF INSTR(1,tagname(tag_sum),MYTXT)>0 THEN
           EXIT DO
       ENDIF
       tag_sum = tag_sum + 1
    Loop
    Close #1   ' 关闭文件。
    DEBUG.PRITNT tag_sum 

Answer 1

就是从文本中取资料
如果文本中有好几段的话.
取了第一段,如何在取第二段