FileClose Function
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.
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 |
|---|---|---|
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.
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.
Smart Device Developer Notes
This function is not supported.
Requirements
Namespace: Microsoft.VisualBasic
**Module:**FileSystem
Assembly: Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)