ملاحظة: يتم تعطيل الدالة أو الأسلوب أو الكائن أو الخاصية الموضحة في هذا الموضوع إذا كانت خدمة تعبير Microsoft Jet قيد التشغيل في وضع بيئة الاختبار المعزولة، مما يمنع تقييم التعبيرات التي يحتمل أن تكون غير آمنة. لمزيد من المعلومات حول وضع بيئة الاختبار المعزولة، ابحث عن "وضع بيئة الاختبار المعزولة" في التعليمات.
إرجاع Long يمثل حجم الملف الذي تم فتحه باستخدام عبارة Open بالبايت.
بناء الجملة
LOF( filenumber )
وسيطة عدد الملفات المطلوب هو عدد صحيح يحتوي على رقم الملف صالح .
ملاحظة: استخدم الدالة FileLen للحصول على طول ملف غير مفتوح.
مثال
ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة Visual Basic for Applications (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.
