работа с текстовым файлом

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
td
Начинающий
Начинающий
 
Сообщения: 23
Зарегистрирован: 08.04.2003 (Вт) 19:34

работа с текстовым файлом

Сообщение td » 28.04.2003 (Пн) 17:01

есть текстовый файл примерно такого вида:

[Абзац1]
В день, когда его должны были убить, Сантьяго Насар поднялся в половине
шестого, чтобы встретить корабль, на котором прибывал епископ. Ему снилось,

[Абзац2]
Сантьяго Насар тоже не усмотрел дурного знака. Он спал мало и плохо,
прямо в одежде, и проснулся с головной болью и медным привкусом во рту, но

[Абзац3]
Сантьяго Насар надел белые льняные некрахмаленые брюки и рубашку, точно
такие же, что были на нем накануне - на свадьбе. Это была его парадная
одежда.


при работе программы из списка выбирается наименование абзаца (то, что указано квадратных скобках). Дальше необходимо в другой файл записать нужный абзац.
Сейчас я перебираю весь файл посимвольно, нахожу, например [Абзац2] и дальше посимвольно переписываю весь текст до следующей квадратной скобки. В результате получается довольно долго при больших объемах текста.

Можно ли как-нибудь сделать получше и чтобы работало побыстрее? :)

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 28.04.2003 (Пн) 17:13

Вычитывай строками:
Line Input #<file_descriptor>, <string_variable>

В <string_variable> получишь свою строку. Дальше понятно что.

Пиши тоже строками:
Print #<file_descriptor>, <string_variable>

Если абзац надо записать как одну непрерывную строку, тогда так
Print #<file_descriptor>, <string_variable>;
а в конце абзаца
Print #<file_descriptor>,

td
Начинающий
Начинающий
 
Сообщения: 23
Зарегистрирован: 08.04.2003 (Вт) 19:34

Сообщение td » 28.04.2003 (Пн) 20:50

пасиб :)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 51

    TopList  
cron