vb6.0 怎样从txt中第二行开始读取数据到末尾

Question

Dim i As Integer, a, str() As String

Open "d:\1.txt" For Input As #1

Do While Not EOF(1)
Line Input #1, a

str = Split(a, ",")

If str(2) = "2" Then
TreeView1.Nodes.Add "abc", tvwChild, str(0) & i, str(0)
i = i + 1

End If
Loop
Close #1

怎样从第二行开始读取数据?

Answer 1

在open之后、do之前，加一行
Line Input #1, a
就成了