Bemærk!: Funktionen, metoden, objektet eller egenskaben, der er beskrevet i dette emne, deaktiveres, hvis Microsoft Jet Expression Service kører i sandkassetilstand, hvilket forhindrer evalueringen af potentielt usikre udtryk. Søg efter "sandkassetilstand" i Hjælp, hvis du vil have mere at vide om sandkassetilstand.
Returnerer en Lang, der repræsenterer størrelsen i byte på en fil, der åbnes ved hjælp af Open-sætningen .
Syntaks
LOF( filnummer )
Den påkrævede argument er et Heltal, der indeholder en gyldig filnummer.
Bemærk!: Brug funktionen FileLen til at få længden på en fil, der ikke er åben.
Eksempel
Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.
I dette eksempel bruges funktionen LOF til at bestemme størrelsen på en åben fil. I dette eksempel antages det, at TESTFILE er en tekstfil, der indeholder eksempeldata.
Dim FileLengthOpen "TESTFILE" For Input As #1 ' Open file.FileLength = LOF(1) ' Get length of file.Close #1 ' Close file.
