Примечание: Функция, метод, объект или свойство, описанные в данном разделе, отключаются, если служба обработки выражений Microsoft Jet выполняется в режиме песочницы, который не позволяет рассчитывать потенциально небезопасные выражения. Для получения дополнительных сведений выполните в справке поиск по словам "режим песочницы".
Возвращает величину long, представляющую размер файла, открытого с помощью выписки "Открыть", в которые он вбавляет.
Синтаксис
LOF( filenumber )
Требуемая аргумент является integer, содержащей допустимый номер файла.
Примечание: Для получения длиныфайла, который не открыт, используйте функцию FileLen.
Пример
Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (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.
