Closes all disk files opened using the FileOpen function.
Public Sub Reset()
The Reset function closes all active files opened by the FileOpen function and has the same function as FileClose() without any parameters.
This example uses the Reset function to close all open files and write the contents of all file buffers to disk. Note the use of the Object variable FileNumber
as both a string and a number.
' Open 5 files named TEST1, TEST2, etc.
Dim fileNumber As Integer
For fileNumber = 1 To 5 ' Open 5 files.
FileOpen(fileNumber, "TEST" & fileNumber, OpenMode.Output)
PrintLine(fileNumber, "Hello World")
Next fileNumber
Reset()
' Close files and write contents to disk.
FileClose Function | End Statement | FileOpen Function |