F
Fenomant
Доброго времени суток. Использую VB2010
Вопрос:
Почему цикл DO (чтения из файла) выполняется только 1 раз, и только до цикла FOR?
Код:
Public CONFIG(0 To 11, 0 To 1) As String
...
CONFIG(0, 0) = "ip"
CONFIG(0, 1) = "127.0.0.1"
CONFIG(1, 0) = "port"
CONFIG(1, 1) = "1000"
...
Код:
Public Sub ConfigRead()
FileOpen(1, "conf.ini", OpenMode.Input)
Do Until EOF(1)
PAKET_lbControlPaketSAVELIST.Items.Add("-------------------------") ' ListBox для проверки
For i As Integer = 0 To CONFIG.Length / 2 Step 1
If InStr(1, LineInput(1), CONFIG(i, 0)) Then
CONFIG(i, 1) = Mid(LineInput(1), CONFIG(i, 0).Length + 3)
Exit For
End If
Next i
Loop
FileClose(1)
End Sub
Вопрос:
Почему цикл DO (чтения из файла) выполняется только 1 раз, и только до цикла FOR?