Читайте также:
|
В Visual Basic реализованы три типа доступа к файлам:
· последовательный – для чтения и записи текстовых файлов;
· произвольный – для чтения и записи текста с записями структурированной длины;
· двоичный – для чтения и записи произвольно структурированных файлов.
Мы в настоящей тетради будем рассматривать только последовательный доступ. Данные в файле хранятся при этом в неструктурированном виде.
Работа с файлами данных всегда состоит из нескольких этапов:
· получение дескриптора файла;
· открытие файла;
· чтение или запись данных;
· закрытие файла.>
Рассмотрим все перечисленные этапы поочередно.
Дескриптор файла. Чтобы работать с файлами, нужно понимать, как связывается система с файлом. Для этого имеется канал ввода-вывода. При открытии файлу ставится в соответствие канал с определенным номером. Каждый открытый файл имеет собственный канал, с помощью которого записываются или считываются данные. Для ввода и вывода данных имеет значение не имя файла, а номер канала.
Функция Visual Basic FreeFile возвращает номер свободного канала, который можно использовать для работы с файлом.
intFh = FreeFile()
В этом примере переменной intFH присваивается целое значение, которое можно использовать для открытия файла.
Открытие файла. Способ открытия файла с последовательным доступом (для чтения, записи или добавления) задается при вызове оператора Open.
Open Имя_файла For [Input \ Output \ Append] As FileHandle
Если в операторе использовано слово Input, то файл открывается только для чтения из файла. Если файл не существует и открывается для чтения, то Visual Basic выдает сообщение об ошибке.
Если в операторе использовано слово Output, то файл открывается для записи. Если файл с таким именем уже существует, то его содержимое удаляется. Если файла с таким именем нет на диске, то создается новый файл.
Если в операторе использовано слово Append, то файл открывается для добавления. Если файла с таким именем нет, то он создается.
В конце оператора указывается номер канала, возвращаемый функцией FreeFile. Приведем несколько примеров использования оператора Open при последовательном доступе.
Open “Text. txt” For Input As intFH1
Open “C: / DAN / Text. txt” For Output As intFH2
Open “Proba. txt” For Append As intFH3
Чтение данных из файла. Для считывания данных из файла, открытого для последовательного доступа, существует несколько возможностей. В общем случае это осуществляется с помощью оператора Input,имеющего несколько разновидностей.
1)Line Input # считывает одну строку;
2)Input # считывает последовательность символов, обычно записанных с помощью оператора Write #;
3)Input$ считывает определенное количество символов.
Существует несколько вариантов чтения всей информации из файла. Перед чтением нужно открыть файл с помощью оператора Open…For Input:
IntFH = FreeFile
Open “Tex t.txt” For Input As intFH
Первый вариант
Дата добавления: 2015-01-30; просмотров: 121 | Поможем написать вашу работу | Нарушение авторских прав |