Считывание данных из второй строки в переменную - VB

Формулировка задачи:

Написал небольшой код, для считывания данных из второй строки в переменную. Чет не так.
Dim Fh As String
Dim S As String
Dim i As Integer 
Dim tS As String 
Private Sub Form_Load()
Fh = FreeFile()
Open ("C:\PerfLogs\Admin\vsx.dat") For Input As Fh
For i = 1 To 5
Line Input #Fh, tS
If i = 2 Then S = tS
Next i
Close #Fh
Label1.Caption = S
End Sub

Код к задаче: «Считывание данных из второй строки в переменную - VB»

textual
Но все равно лучше сделать так
If i = 2 Then S = tS: exit for

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

14   голосов, оценка 4.071 из 5


СОХРАНИТЬ ССЫЛКУ