FileSystem.FreeFile Méthode
Définition
Important
Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.
Retourne une valeur Integer
qui représente le prochain numéro de fichier utilisable par la fonction FileOpen
.
public:
static int FreeFile();
public static int FreeFile ();
static member FreeFile : unit -> int
Public Function FreeFile () As Integer
Retours
Une valeur entière qui représente le prochain numéro de fichier utilisable par la fonction FileOpen
.
Exceptions
Plus de 255 fichiers sont en cours d'utilisation.
Exemples
Cet exemple utilise la FreeFile
fonction pour renvoyer le numéro de fichier disponible suivant. Cinq fichiers sont ouverts pour la sortie dans la boucle, et des 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
Utilisez FreeFile
pour fournir un numéro de fichier qui n’est pas déjà utilisé.