FileSystem.FreeFile Метод

Определение

Пространство имен:
Microsoft.VisualBasic
Сборка:
Microsoft.VisualBasic.Core.dll
Сборка:
Microsoft.VisualBasic.dll
Исходный код:
FileSystem.vb
Исходный код:
FileSystem.vb
Исходный код:
FileSystem.vb
Исходный код:
FileSystem.vb
Исходный код:
FileSystem.vb

Integer Возвращает значение, представляющее следующий номер файла, доступный для использования функциейFileOpen.

public:
 static int FreeFile();
public static int FreeFile();
static member FreeFile : unit -> int
Public Function FreeFile () As Integer

Возвращаемое значение

Int32

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

Исключения

IOException

Используется более 255 файлов.

Примеры

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

Dim count As Integer
Dim fileNumber As Integer
For count = 1 To 5
    fileNumber = FreeFile()
    FileOpen(fileNumber, "TEST" & count & ".TXT", OpenMode.Output)
    PrintLine(fileNumber, "This is a sample.")
    FileClose(fileNumber)
Next

Комментарии

Используется FreeFile для предоставления номера файла, который еще не используется.

Применяется к

См. также раздел