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 filenumberargument (failinumber) on täisarv, milles on parameetri failinumber sobiv väärtus.
Märkus.: Kasutage funktsiooni FileLen , et saada faili pikkus, 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 on näidisandmeid sisaldav tekstifail.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.