Notă: Funcția, metoda, obiectul sau proprietatea descrise în acest subiect este dezactivată dacă Serviciul de expresii Microsoft Jet rulează în modul sandbox, ceea ce împiedică evaluarea expresiilor potențial nesigure. Pentru mai multe informații despre modul sandbox, căutați "modul sandbox" în Ajutor.
Returnează o valoare Lung reprezentând dimensiunea, în byți, a unui fișier deschis utilizând instrucțiunea Open .
Sintaxă
LOF( număr fișier )
Numărul de fișier necesarargument este un număr întreg care conține o număr fișier validă.
Notă: Utilizați funcția FileLen pentru a obține lungimea unui fișier care nu este deschis.
Exemplu
Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.
Acest exemplu utilizează funcția LOF pentru a determina dimensiunea unui fișier deschis. Acest exemplu presupune că TESTFILE este un fișier text care conține date eșantion.
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file. FileLength = LOF(1) ' Get length of file. Close #1 ' Close file.