FileSystem.FreeFile Metodo
Definizione
Importante
Alcune informazioni sono relative alla release non definitiva del prodotto, che potrebbe subire modifiche significative prima della release definitiva. Microsoft non riconosce alcuna garanzia, espressa o implicita, in merito alle informazioni qui fornite.
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.