Примечание: Функция, метод, объект или свойство, описанные в данном разделе, отключаются, если служба обработки выражений Microsoft Jet выполняется в режиме песочницы, который не позволяет рассчитывать потенциально небезопасные выражения. Для получения дополнительных сведений выполните в справке поиск по словам "режим песочницы".

Возвращает значение Long, представляющее размер (в байтах) файла, открытого с помощью инструкции Open .

Синтаксис

LOF( filenumber )

Обязательныйаргументfilenumber — это целое число, содержащее допустимый номер файла.

Примечание:  Используйте функцию FileLen , чтобы получить длину файла, который не открыт.

Пример

Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В этом примере функция LOF используется для определения размера открытого файла. В этом примере предполагается, что TESTFILE является текстовым файлом, содержащим примеры данных.

Dim FileLengthOpen "TESTFILE" For Input As #1    ' Open file.FileLength = LOF(1)    ' Get length of file.Close #1    ' Close file.

Нужна дополнительная помощь?

Нужны дополнительные параметры?

Изучите преимущества подписки, просмотрите учебные курсы, узнайте, как защитить свое устройство и т. д.

В сообществах можно задавать вопросы и отвечать на них, отправлять отзывы и консультироваться с экспертами разных профилей.