VB6.0 读取文本第二行的信息


Private Sub Form_Load()
Dim s1 As String
Dim s2 As String
Open "d:\data.txt" For Input As #1
Line Input #1, s1
Line Input #1, s2
Label1.Caption = s2
Close #1
End Sub