.
И еще почему -то наблюдается такой баг. Читаю информацию из текстового файла, просто при запуски проги на выполнение по F5 все нормально данные считываются и переносятся в массив, а при установки контрольной точки и прогона по F8 любая строчка после fileopen как бы считывает одну строку из файла, и ничео не получается, код такой:
Sub readInfo(ByVal fname As String, ByRef arst() As String, ByRef recCount As Integer)
'recCount = 0
FileOpen(1, fname, OpenMode.Input) 'открываем файл для чтения
While Not (EOF(1))
arst(recCount) = LineInput(1)
recCount = recCount + 1
End While
ReDim Preserve arst(recCount-1)
почему так происходит?
