Zobrazit vše

Skrýt vše

Vrátí hodnotu typu Long (Typ dat Long: Základní typ dat pro ukládání velkých celých čísel. Proměnná typu Long je uložena jako 32bitové číslo v rozmezí od -2 147 483 648 do 2 147 483 647.) určující aktuální pozici čtení/zápisu v otevřeném souboru.

Syntaxe

Loc(číslo_souboru)

Povinný argument (Argument: Hodnota, která poskytuje informace určité akci, události, metodě, vlastnosti, funkci nebo proceduře.) číslo_souboru je jakékoliv platné celé číslo (Typ dat Integer: Základní typ dat zahrnující celá čísla. Proměnná Integer je uložena jako 16bitové (2bajtové) číslo s hodnotou v rozsahu od -32,768 do 32,767.) představující číslo souboru (Číslo souboru: Číslo použité v příkazu Open při otevírání souboru. U souborů, které nejsou přístupné z jiných aplikací, používejte čísla v rozsahu 1–255 včetně. U souborů dostupných z jiných aplikací používejte čísla v rozsahu 256–511.).

Poznámky

Následující tabulka popisuje vrácenou hodnotu pro jednotlivé režimy přístupu k souboru:

Příklad

 Poznámka:   Následující příklady uvádějí použití této funkce v modulu jazyka Visual Basic for Applications (VBA). Další informace o práci s jazykem VBA získáte tak, že klepnete na položku Referenční informace pro vývojáře v rozevíracím seznamu vedle pole Hledat a do pole pro hledání zadáte jeden nebo více pojmů.

Tento příklad používá funkci Loc k vrácení aktuální pozice čtení/zápisu v otevřeném souboru. Tento příklad předpokládá, že TESTFILE je textový soubor s několika řádky vzorových dat.

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; MyLocation
Loop
Close #1    ' Close file.