FileSystem.FreeFile Méthode

Définition

Retourne une Integer valeur qui représente le numéro de fichier suivant disponible pour une utilisation par la FileOpen fonction.

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

Retours

Valeur entière qui représente le numéro de fichier suivant disponible pour une utilisation par la FileOpen fonction.

Exceptions

Plus de 255 fichiers sont utilisés.

Exemples

Cet exemple utilise la FreeFile fonction pour retourner le numéro de fichier disponible suivant. Cinq fichiers sont ouverts pour la sortie dans la boucle, et certains exemples de données sont écrits dans chacun d’eux.

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

Remarques

Permet FreeFile de fournir un numéro de fichier qui n’est pas déjà utilisé.

S’applique à

Voir aussi