Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
kostrorod
39 / 28 / 8
Регистрация: 14.04.2012
Сообщений: 248
1

Как при чтении файла проверить достигнут ли конец файла?

17.11.2014, 16:47. Просмотров 619. Ответов 7
Метки нет (Все метки)

Как при чтении файла проверить достигнут ли конец файла?

vb.net
1
2
3
4
5
Dim Red As IO.BinaryReader
Red = New IO.BinaryReader(IO.File.OpenRead("path"))
TextBox1.Text = Red.ReadString
 ' здесь нужно проверить достигнут ли конец файла
Red.close
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.11.2014, 16:47
Ответы с готовыми решениями:

Как при чтении файла указать кодировку
Всем доброго времени суток! Есть переменная Dim SB As New System.Text.StringBuilder в ней...

Как указать кодировку при чтении текстового файла
Я пишу некий парсер логов. Указываю строковое значение, например "образец1", выбираю несколько...

Перевод строки при чтении из файла
Всем привет в LinkLabel берется текст из файла, но у него есть ограничение по ширине, при котором...

Неверная кодировка при чтении из файла
Обнаружил неприятный факт, при чтении текста из файла в Label.Text он отображается...

Ввод за концом файла при чтении txt
Доброго времени суток! 1) Написал код, который читает файл. Файл выглядит как-то так: SID DS...

7
Памирыч
Почетный модератор
20934 / 8818 / 1080
Регистрация: 11.04.2010
Сообщений: 11,012
17.11.2014, 18:04 2
kostrorod, принципиально с BinaryReader или Ваш вопрос - как считать все байты из файла?
0
Дядя Корней
390 / 309 / 53
Регистрация: 14.08.2014
Сообщений: 1,010
17.11.2014, 18:27 3
kostrorod, фиг его знает как правильно. Поскольку в данном случае нет как таковых строк, то я бы наверное скинул все байты в массив и посчитал сколько байт в массиве, это и было бы поинтером конца файла.

Еще вот так по идее должно прокатить:
vb.net
1
While NOT BinaryReader.EOF
Или так:
vb.net
1
While Not Red Is Nothing
0
kostrorod
39 / 28 / 8
Регистрация: 14.04.2012
Сообщений: 248
17.11.2014, 19:19  [ТС] 4
Памирыч, да принципиально

Добавлено через 9 минут
Дядя Корней, выбрасывает ошибку, то есть пытается читать дальше
0
17.11.2014, 19:19
Памирыч
Почетный модератор
20934 / 8818 / 1080
Регистрация: 11.04.2010
Сообщений: 11,012
17.11.2014, 19:22 5
kostrorod, не перевариваю этот бинари ридер, хотя успешно юзаю его "обертки", поэтому кода нет

Цитата Сообщение от stanav
binaryReader.BaseStream.Length gives you the length of the underlying base stream on the binary reader... So you just use a counter to loop while counter < binaryReader.BaseStream.Length
С форума VBForums

http://stackoverflow.com/questions/1...er-end-of-file
1
kostrorod
39 / 28 / 8
Регистрация: 14.04.2012
Сообщений: 248
17.11.2014, 19:43  [ТС] 6
Вот такая запись думаю подойдёт
vb.net
1
2
3
If Red.BaseStream.Position = Red.BaseStream.Length Then
     ' достигнут конец файла
End If
0
Памирыч
Почетный модератор
20934 / 8818 / 1080
Регистрация: 11.04.2010
Сообщений: 11,012
17.11.2014, 19:48 7
kostrorod, проверьте. Может и сработать
0
Visualist
51 / 51 / 25
Регистрация: 01.02.2014
Сообщений: 201
17.11.2014, 21:45 8
vb.net
1
2
3
        Do Until Red.PeekChar() = -1
             TextBox1.Text = Red.ReadString 
        Loop
Используется функция PeekChar (попробуй символ) класса BinaryReader. Она работает аналогично функции Peek класса StreamReader
0
17.11.2014, 21:45
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.11.2014, 21:45

Не распознает кириллицу при чтении из файла XML
Доброго времени суток. Проблема заключается в следующем, что при чтении их фала xml кириллица...

Ошибка при чтении пустого XML-файла
На жёстком диске есть пустой файл: program_name.xml При попытке его считывания программа выдаёт...

Изменение кодировки текста при чтении/записи файла txt
Здравствуйте! Код ниже изменяет файл (отбрасывает последний знак в файле &quot;переноса строки&quot; если...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru