Pastaba: Šioje temoje aprašyta funkcija, metodas, objektas arba ypatybė yra išjungta, jei "Microsoft Jet Expression Service" veikia smėlio dėžės režimu, kuris neleidžia įvertinti galimai nesaugių reiškinių. Jei reikia daugiau informacijos apie smėlio dėžės režimą, žinyne ieškokite "smėlio dėžės režimas".
Pateikia ilgą skaičių, nurodantį failo, atidaryto naudojant sakinį Open , dydį baitais.
Sintaksė
LOF( failo numeris )
Reikiamas failo numerisargumentas yra sveikasis skaičius, kuriame yra galiojantis failo numeris.
Pastaba: Naudokite funkciją FileLen , kad gautumėte neatidarytą failą.
Pavyzdys
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Šiame pavyzdyje naudojama FUNKCIJA LOF , kad būtų galima nustatyti atidaryto failo dydį. Šiame pavyzdyje daroma prielaida, kad TESTFILE yra teksto failas, kuriame yra duomenų pavyzdžių.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.