FileSystem.FreeFile Metoda
Definicja
Ważne
Niektóre informacje odnoszą się do produktu w wersji wstępnej, który może zostać znacząco zmodyfikowany przed wydaniem. Firma Microsoft nie udziela żadnych gwarancji, jawnych lub domniemanych, w odniesieniu do informacji podanych w tym miejscu.
Integer
Zwraca wartość reprezentującą następny numer pliku dostępny do użycia przez FileOpen
funkcję.
public:
static int FreeFile();
public static int FreeFile ();
static member FreeFile : unit -> int
Public Function FreeFile () As Integer
Zwraca
Wartość całkowita reprezentująca następny numer pliku dostępny do użycia przez FileOpen
funkcję.
Wyjątki
Jest używanych ponad 255 plików.
Przykłady
W tym przykładzie użyto FreeFile
funkcji , aby zwrócić następny dostępny numer pliku. Dla danych wyjściowych w pętli jest otwieranych pięć plików, a niektóre przykładowe dane są zapisywane w każdej z nich.
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
Uwagi
Służy FreeFile
do podawania numeru pliku, który nie jest jeszcze używany.