Märkus.
Kui Microsoft Jet Expression Service töötab liivakastirežiimis, mis takistab potentsiaalselt ebaturvaliste avaldiste väärtustamist, on käesolevas artiklis kirjeldatud funktsioon, meetod, objekt või atribuut keelatud. Liivakastirežiimi kohta lisateabe saamiseks otsige spikrist sõna „liivakastirežiim“.
Tagastab väärtuse Pikk, mis tähistab Open-lausega avatud faili mahtu baitides.
Süntaks
LOF(failinumber)
Nõutav failinumbriargument on täisarv, mis sisaldab sobivat failinumbrit.
Märkus.
Funktsiooni FileLen abil saate hankida faili pikkuse, mis pole avatud.
Näide
Märkus.
Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.
Selles näites kasutatakse funktsiooni LOF avatud faili mahu määramiseks. Selles näites eeldatakse, et TESTFILE tegemist on näidisandmeid sisaldava tekstifailiga.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.