Condividi tramite


FileSystem.FreeFile Metodo

Definizione

Restituisce un valore Integer che rappresenta il successivo numero di file che può essere utilizzato dalla funzione FileOpen.

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

Restituisce

Valore Integer che rappresenta il successivo numero di file che può essere usato dalla funzione FileOpen.

Eccezioni

Più di 255 file sono in uso.

Esempio

In questo esempio viene usata la FreeFile funzione per restituire il numero di file disponibile successivo. Cinque file vengono aperti per l'output all'interno del ciclo e alcuni dati di esempio vengono scritti in ognuno di essi.

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

Commenti

Usare FreeFile per specificare un numero di file non già usato.

Si applica a

Vedi anche