This topic has not yet been rated - Rate this topic

FileClose Function

Visual Studio 2008

Concludes input/output (I/O) to a file opened using the FileOpen function.

Using My gives you greater productivity and performance in file I/O operations. See My.Computer.FileSystem Object for more information.

Copy

Public Sub FileClose(ParamArray FileNumbers() As Integer)

Parameters

FileNumbers: Optional. Parameter array of 0 or more channels to be closed.

Exceptions

Exception type	Error number	Condition
IOException	52	FileNumber does not exist.

See the "Error number" column if you are upgrading Visual Basic 6.0 applications that use unstructured error handling. (You can compare the error number against the Number Property (Err Object).) However, when possible, you should consider replacing such error control with Structured Exception Handling Overview for Visual Basic.

Remarks

The FileClose function is provided for backward compatibility and may affect performance. For non-legacy applications, the My.Computer.FileSystem object provides better performance. For more information, see File Access with Visual Basic.

If you omit FileNumbers, all active files opened by the FileOpen function are closed.

When you close files that were opened for Output or Append, the final buffer of output is written to the operating system buffer for that file. All buffer space associated with the closed file is released.

When the FileClose function is executed, the association of a file with its file number ends.

Example

This example uses the FileClose function to close a file opened for Input.

Copy

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.