Huomautus
Tässä ohjeaiheessa kuvattu funktio, menetelmä, objekti tai ominaisuus ei ole käytössä, jos Microsoft Jet Expression Service toimii eristetyssä tilassa, mikä estää mahdollisesti vahingollisten lausekkeiden arvioimisen. Katso lisätietoja eristetystä tilasta ohjeen ”Eristetty tila” -kohdasta.
Palauttaa Long-funktion, joka vastaa Open-lauseella avatun tiedoston kokoa tavuina.
Syntaksi
LOF(tiedostonumero)
Pakollinen tiedostonumeroargumenttion kokonaisluku, joka sisältää kelvollisen tiedostonumeron.
Huomautus
FileLen-funktion avulla voit selvittää sellaisen tiedoston pituuden, jota ei ole avattu.
Esimerkki
Huomautus
Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.
Tässä esimerkissä LOF-funktion avulla määritetään avoimen tiedoston koko. Tässä esimerkissä oletetaan, että TESTFILE se on esimerkkitietoja sisältävä tekstitiedosto.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.