Читайте также:
|
Текстовой файл содержит в себе текстовые символы и символы типа возврат каретки или перевод строки. Традиционно они имеют расширение .txt для текста, .dat для данных, .bat для исполняемых (командных) файлов, в Windows еще использует .ini, .log, .inf. Читать и записывать их надо последовательно, символ за символом, начиная с первого.
Итак, чтобы что-нибудь сделать с файлом, прежде всего, его надо открыть.
При открытии файла для последовательного доступа нельзя считать какой-то один, к примеру, знак из середины файла, для этого есть другие способы доступа, которые можете изучить самостоятельно.
Для открытия файла используется оператор Open. Синтаксис его такой:
Open путь For режим As #номер файла Примечание: для открытия файлов прямого доступа, или двоичных файлов оператор Open содержит еще кое-какие аргументы, но сейчас мы их не используем и опускаем.
Все указанные аргументы должны обязательно присутствовать:
путь - это полный путь к открываемому файлу - (строковое выражение) пишется в кавычках, может состоять из нескольких строк, соединенных знаком конкатенации &. (Например "c:\MyText\referat.txt" или "c:\Mytext\" & "referat.txt")
режим - способ открытия файла и представляет собой ключевые слова. Мы будем использовать Input для считывания данных из файла, Output - для записи данных в файл, и Append - для добавления данных в файл. В режиме Input можно еще раз открыть уже открытый файл под другим номером, не закрывая его, в режимах Output и Append надо сначала закрыть файл, а потом открыть его снова.
#номер файла - это всего лишь номер, по которому VB индентефицирает открытый файл. Он может быть любой от #1 до #255. Однако, лучше всего использовать функцию FreeFile (см. в примере), которая сразу возвратит свободный номер в переменную, и нет нужды искать по своему коду, открыт ли файл под номером, например #3.
После того, как передача или прием данных в (из) файл(а) будут закончены, его надо закрыть, делается это оператором Close. Если этот оператор написать без всяких аргументов, он закроет все открытые файлы. Если же нам надо закрыть файл, скажем номер 2, то пишем Close #2. Попробуем работать с файлами на примерах:
| СЧИТЫВАНИЕ из текстового файла. |
Создадим новый.exe проект в какой-нибудь папке и в ту же папку положим небольшой текстовой файл (например "Справка.txt"). На форме разместим кнопку Command1 и текстовое поле Text1. В свойствах Text1 свойство Multiline поставим в True (чтобы текст переносился по строкам), а свойство ScrollBars в 2 - Вертикаль (чтобы можно было прокручивать текст, если он не уместился) смотри рисунок.
Откроем окно кода и в (General) объявим переменные F для хранения номера свободного файла, MyText и AllMyText - для хранения считываемого текста:
Дата добавления: 2015-07-19; просмотров: 41 | Нарушение авторских прав
| <== предыдущая страница | | | следующая страница ==> |
| Типы файлов, расширение имени файла | | | End Sub |