Nota
La función, el método, el objeto o la propiedad descritos en este tema se deshabilitan si el servicio de expresiones de Microsoft Jet se ejecuta en modo de espacio aislado, lo que impide la evaluación de expresiones potencialmente inseguras. Para obtener más información sobre el modo de espacio aislado, busque "modo de espacio aislado" en la Ayuda.
Devuelve un valor Long que representa el tamaño, en bytes, de un archivo abierto con la instrucción Open .
Sintaxis
LOF(filenumber)
El argumento filenumberrequerido es un entero que contiene un número de archivo válido.
Nota
Use la función FileLen para obtener la longitud de un archivo que no está abierto.
Ejemplo
Nota
Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione referencia para desarrolladores en la lista desplegable situada junto a búsqueda y escriba uno o varios términos en el cuadro de búsqueda.
En este ejemplo se usa la función LOF para determinar el tamaño de un archivo abierto. En este ejemplo se supone que se trata de un archivo de texto que TESTFILE contiene datos de ejemplo.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.