หมายเหตุ
ฟังก์ชัน วิธีการ วัตถุ หรือคุณสมบัติที่อธิบายไว้ในหัวข้อนี้จะถูกปิดใช้งานถ้า Microsoft Jet Expression Service ทํางานในโหมด Sandbox ซึ่งจะป้องกันการประเมินนิพจน์ที่อาจไม่ปลอดภัย สําหรับข้อมูลเพิ่มเติมเกี่ยวกับโหมด Sandbox ให้ค้นหา "โหมด Sandbox" ในวิธีใช้
ส่งกลับ Long ที่แสดงขนาดเป็นไบต์ของไฟล์ที่เปิดโดยใช้คําสั่ง เปิด
ไวยากรณ์
LOF(filenumber)
อาร์กิวเมนต์ 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.