Applies ToAccess dla Microsoft 365 Access 2021 Access 2019 Access 2016

Uwaga: Funkcja, metoda, obiekt lub właściwość opisana w tym temacie jest wyłączona, jeśli usługa wyrażeń Microsoft Jet działa w trybie piaskownicy, co uniemożliwia oszacowanie potencjalnie niebezpiecznych wyrażeń. Aby uzyskać więcej informacji na temat trybu piaskownicy, wyszukaj "tryb piaskownicy" w Pomocy.

Zwraca wartość typu Liczba całkowita reprezentująca następną numer pliku dostępną do użycia przez instrukcję Open .

Składnia

FreeFile[(numer_zakresu)]

Argument opcjonalny numer_zakresu jest wartością typu wariant określającą zakres, z którego ma zostać zwrócony następny bezpłatny numer pliku. Określ wartość 0 (domyślną), aby zwrócić numer pliku w zakresie od 1 do 255 włącznie. Określ 1, aby zwrócić numer pliku w zakresie od 256 do 511.

Uwagi

Użyj pliku FreeFile , aby podać numer pliku, który nie jest jeszcze używany.

Przykład

Uwaga: Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.

W tym przykładzie użyto funkcji FreeFile w celu zwrócenia następnego dostępnego numeru pliku. W pętli jest otwartych pięć plików, a do każdego z nich jest zapisywanych kilka przykładowych danych.

Dim MyIndex, FileNumberFor MyIndex = 1 To 5    ' Loop 5 times.    ' Get unused file number.    FileNumber = FreeFile    ' Create file name.    Open "TEST" & MyIndex For Output As #FileNumber    ' Output text.    Write #FileNumber, "This is a sample."    ' Close file.    Close #FileNumberNext MyIndex

Potrzebujesz dalszej pomocy?

Chcesz uzyskać więcej opcji?

Poznaj korzyści z subskrypcji, przeglądaj kursy szkoleniowe, dowiedz się, jak zabezpieczyć urządzenie i nie tylko.

Społeczności pomagają zadawać i odpowiadać na pytania, przekazywać opinie i słuchać ekspertów z bogatą wiedzą.