Иллюстрированный самоучитель по Visual Basic 6.0
Ch 9.htm
назад | содержание
| вперед
Запись данных
Данные в файл последовательного
доступа записываются с помощью операторов print # и write #. Оператор write
# дополнительно автоматически вставляет в файл разделители, но не дает гибкости
при управлении форматированием данных. Как можно было заметить при изучении
функций чтения данных, каждая из функций записи работает в паре с определенной
функцией чтения. Для оператора print # это функции Input или Line Input #, а
для оператора write #t — это Input #.
Совет
Рекомендуется при применении операций
записи/чтения данных из файлов использовать именно такие пары функций и операторов
записи/чтения.
Рассмотрим оператор print #. Он
имеет следующий синтаксис:
Print #fileNumber, [outputlist]
где:
- fileNumber — номер файла, аналогичный
номеру файла в операторе open;
- outputlist — список выражений
или переменных для записи.
Оператор write ft имеет следующий
синтаксис:
Write #fileNumber, [outputlist]
где:
- fileNumber — номер файла, аналогичный
номеру в операторе open;
- outputlist — список выражений
или переменных для записи.
При выполнении записи данных в файл
оператор write # после каждой строки автоматически вставляет символ перевода
каретки CHR(13) и символ новой строки CHR(10).
Заменим код в нашем приложении
MyFileProject на следующий:
Dim strFileName As String
Dim strFileContent As String
Dim nFreeFile As Integer
Private Sub cbStart_Click()
nFreeFile = FreeFile
cdCommonDialog.ShowSave
strFileName = cdCommonDialog.FileName
If strFileName <> ""
Then
Open strFileName For Output As nFreeFile
strFileContent = txtFile.Text
Print #nFreeFile, strFileContent
Close
End If
End Sub
В полученном приложении данные,
введенные в текстовое поле, будут записываться оператором print # в файл, найденный
при помощи диалогового окна сохранения файлов.
назад | содержание
| вперед
