Примітка.: Функція, метод, об’єкт або властивість, описана в цьому розділі, недоступна, якщо Microsoft Jet Expression Service працює в режимі ізольованого програмного середовища, що запобігає обчисленню потенційно небезпечних виразів. Щоб отримати докладні відомості про режим ізольованого програмного середовища, у вікні довідки шукайте за запитом "режим ізольованого програмного середовища".
Повертає довге ціле, що позначає розмір у байтах файлу, відкритого за допомогою оператора Open .
Синтаксис
LOF( номер файлу )
Обов'язковий аргумент filenumber – це ціле число, що містить припустимі номер файлу.
Примітка.: Скористайтеся функцією FileLen , щоб отримати довжину невідкритого файлу.
Приклад
Примітка.: У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі використано функцію LOF для визначення розміру відкритого файлу. У цьому прикладі припускається, що TESTFILE – це текстовий файл, який містить зразки даних.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.