FileSystem.FreeFile Methode

Definition

Namespace:
Microsoft.VisualBasic
Assembly:
Microsoft.VisualBasic.dll

Gibt einen Integer Wert zurück, der die nächste Dateinummer darstellt, die für die Verwendung durch die FileOpen Funktion verfügbar ist.

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

Gibt zurück

Int32

Ein ganzzahliger Wert, der die nächste Dateinummer darstellt, die von der FileOpen Funktion verwendet werden kann.

Ausnahmen

IOException

Mehr als 255 Dateien werden verwendet.

Beispiele

In diesem Beispiel wird die FreeFile Funktion verwendet, um die nächste verfügbare Dateinummer zurückzugeben. Fünf Dateien werden für die Ausgabe innerhalb der Schleife geöffnet, und einige Beispieldaten werden in jede datei geschrieben.

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

Hinweise

Hiermit geben Sie FreeFile eine Dateinummer an, die noch nicht verwendet wird.

Gilt für:

Weitere Informationen