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 długa określającą bieżącą pozycję odczytu/zapisu w otwartym pliku.

Składnia

Loc( numer pliku )

Wymaganyargumenttypu filenumber to dowolny prawidłowy numer pliku całkowity.

Uwagi

Poniżej opisano zwracane wartości dla każdego trybu dostępu do pliku:

Tryb

Wartość zwracana

Losowe

Numer ostatniego rekordu odczytanego z pliku lub zapisanego w pliku.

Sekwencyjnego

Bieżąca pozycja bajtu w pliku podzielona przez 128. Jednak informacje zwracane przez Loc dla kolejnych plików nie są używane ani wymagane.

Binarny

Pozycja ostatniego bajtu odczytanego lub napisanego bajtu.

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 funkcja Loc zwraca bieżącą pozycję odczytu/zapisu w otwartym pliku. W tym przykładzie założono, że TESTFILE jest plikiem tekstowym zawierającym kilka wierszy przykładowych danych.

Dim MyLocation, MyLine' Open file just created.Open "TESTFILE" For Binary As #1' Loop until end of file.Do While MyLocation < LOF(1)        ' Read character into variable.    MyLine = MyLine & Input(1, #1)        ' Get current position within file.    MyLocation = Loc(1)        ' Print to the Immediate window.    Debug.Print MyLine; Tab; MyLocationLoopClose #1    ' Close file.

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ą.