VB 读取是第几行？如何从第N行开始？

Private Sub Command2_Click()
On Error Resume Next
Dim str As String, tmpstr() As String
Line Input #1, str
tmpstr = Split(str, vbCrLf)
Text1.Text = Split(tmpstr(i), "-")(0) '& vbCrLf
Text2.Text = Split(tmpstr(i), "-")(1) '& vbCrLf
End Sub

Private Sub Form_Load()
Open "c:\1.txt" For Input As #1
End Sub

这方法能顺序读取每一行，怎么知道是第几行？怎么从第N行开始读？

c:\1.txt 的格式是这样的
059188888880-88888880-福建
059188234881-88234881-福建
059188881239-88881239-福建
.
.
.

[ 本帖最后由 f3981292 于 2013-3-30 11:50 编辑 ]