Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Visual Basic.doc
Скачиваний:
24
Добавлен:
21.02.2016
Размер:
15.63 Mб
Скачать

6.2 Файли послідовного доступу

Файл послідовного доступу можна розглядати як послідовність рядків. У файлі послідовного доступу всі текстові рядки можуть мати різну довжину, тому система не може визначити позицію рядка в файлі, довільний доступ неможливий. При роботі з такими файлами щоб прочитати, наприклад, двадцятий рядок, слід перейти до початку файлу і прочитати дев'ятнадцять початкових рядків. Файли послідовного доступу зручні при роботі з текстом, оскільки можна працювати з рядками будь-якої довжини.

Розчинити файл послідовного доступу можна в одному з трьох режимів:

  1. для введення даних Input - режим зчитування даних з файлу;

  2. для виведення Output - вивід тексту в файл, причому попередній уміст файлу втрачається;

  3. для приєднання Append - режим, який дає змогу додати нові рядки у кінець файлу.

Щоб розчинити файл, слід виконати команду:

Open "FileName" For Mode As FileNumber

FileName - режим доступу до файлу.

Використовуючи оператор Print, можна записувати один або декілька символів за одну операцію запису, причому до файлу додається новий текстовий рядок.

Print # FileNumber, <змінна або константа> [,<змінна або константа> …]

Оператор Write дає змогу записати один або декілька символів за одну операцію запису, до файлу буде додано новий рядок.

Write # FileNumber, <змінна або константа> [,<змінна або константа> …]

Оператор Write відрізняється від оператору Print тим, що форматує дані при запису так

Тип поля

Форматування

Текстове

у лапках

Числове

без форматування

Дата

універсальний формат дати

Наприклад, якщо виконати наступний фрагмент коду програми, буде створено файл Data.txt.

Date = #10/06/2000#

FN = FreeFile

Open "C:\Data.txt" For Output As FN

Write #FN, "Oдин", FN, Date

Print #FN, "Два", FN, Date

Уміст файлу Data.txt буде таким:

"Oдин",1,#2000-10-06#

Два 1 06.10.00

Оператор Input зчитує повний рядок з файлу і розміщує його в одну або декілька змінних.

Input # FileNumber, <змінна > [,<змінна> …]

Якщо запис файлу створено оператором Print, дані можна прочитати як один рядок у деяку змінну. У випадку, коли дані було записано оператором Write, кожну складову запису можна прочитати у окрему змінну для подальшого використання. Причому не слід забувати, що прочитані дані будуть текстового типу.

Зчитування даних з файлу Data.txt можна виконати, наприклад, так:

Open "C:\Data.txt" For Input As FN

Input #FN, X, Y, Z

lblX.Caption = X

lblY.Caption = Y

lblZ.Caption = Z

Input #FN, M

lblM.Caption = M

У результаті виконання коду, значення властивості Caption об'єктів буде таким:

об'єкт X: Oдин;

об'єкт Y: 1;

об'єкт Z: 2000-10-06;

об'єкт M: Два 1 06.10.00.

Після виконання операцій з файлами послідовного доступу, їх, як і файли довільного доступу, обов'язково зачинити оператором Close.

6.3 Бінарні файли

Бінарні файли - це файли, у яких можуть утримуватися спеціальні символи, що не зустрічаються в текстових файлах. Уміст бінарного файлу - це набір символів, кожний з яких можна отримати окремо. До бінарних файлів належать файли, що виконуються, драйвери, шрифти і т.д.

Бінарний файл можна розглядати як файл довільного доступу, кожний запис якого дорівнює 1 байту. У режимі бінарного доступу можна розчинити будь-який файл, але прийдеться працювати з кожним байтом цього файлу окремо.

Розчинити файл можна командою:

Open "FileName" For Binary As FileNumber

Запис і зчитування даних у бінарних файлах виконується операторами Get i Put.