Функция FileClose

Статья
11/05/2008

Обновлен: Ноябрь 2007

Завершает операции ввода-вывода с файлом, открытым с помощью функции FileOpen.

Использование My предоставляет большую производительность и быстродействие в операциях файлового ввода-вывода. Дополнительные сведения см. в разделе Объект My.Computer.FileSystem.

Public Sub FileClose(ParamArray FileNumbers() As Integer)

Параметры

FileNumbers
Необязательный атрибут. Массив параметров из 0 или нескольких каналов, которые должны быть закрыты.

Исключения

Тип исключения	Номер ошибки	Условия
IOException	52	FileNumber не существует.

См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic 6.0, в которых используется неструктурированная обработка ошибок. (Можно сравнить номер ошибки с Свойство Number (объект Err).) Однако, по возможности, следует заменять такую систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.

Заметки

Функция FileClose предоставляется для обратной совместимости и может повлиять на производительность. Для неустаревших версий приложений объект My.Computer.FileSystem предоставляет более высокую производительность. Дополнительные сведения см. в разделе Доступ к файлам с помощью Visual Basic.

Если параметр FileNumbers опущен, то все активные файлы, открытые с помощью функции FileOpen, будут закрыты.

При закрытии файлов, открытых в режимах Output или Append, последнее содержимое буфера вывода записывается в буфер операционной системы для этого файла. Все буферное пространство, связанное с закрываемыми файлами, освобождается.

Выполнение функции FileClose разрывает связь файла с его номером.

Пример

Этот пример использует функцию FileClose для закрытия файла, открытого для Input.

Dim TextLine As String
FileOpen(1, "TESTFILE", OpenMode.Input)   ' Open file.
Do While Not EOF(1)   ' Loop until end of file.
   TextLine = LineInput(1)   ' Read line into variable.
   MsgBox(TextLine)   ' Display the line
Loop
FileClose(1)   ' Close file.