Applies ToAccess for Microsoft 365 Access 2021 Access 2019 Access 2016 Access 2013

หมายเหตุ: ฟังก์ชัน วิธีการ วัตถุ หรือคุณสมบัติที่อธิบายไว้ในหัวข้อนี้จะถูกปิดใช้งานถ้า Microsoft Jet Expression Service ทํางานในโหมด Sandbox ซึ่งจะป้องกันการประเมินนิพจน์ที่อาจไม่ปลอดภัย สําหรับข้อมูลเพิ่มเติมเกี่ยวกับโหมด Sandbox ให้ค้นหา "โหมด Sandbox" ในวิธีใช้

ส่งกลับ Long ที่แสดงโหมดไฟล์สําหรับไฟล์ที่เปิดโดยใช้คําสั่ง เปิด

ไวยากรณ์

FileAttr ( filenumber , returntype )

ไวยากรณ์ของฟังก์ชัน FileAttr มีอาร์กิวเมนต์ดังนี้

อาร์กิวเมนต์

คำอธิบาย

filenumber

จำเป็น จํานวนเต็ม หมายเลขไฟล์ ที่ถูกต้องใดๆ

returntype

จำเป็น จํานวนเต็ม ตัวเลขที่ระบุชนิดของข้อมูลที่จะส่งกลับ ระบุ 1 เพื่อส่งกลับค่าที่ระบุโหมดแฟ้ม บนระบบ 16 บิตเท่านั้น ให้ระบุ 2 เพื่อเรียกใช้ตัวจัดการไฟล์ระบบปฏิบัติการ returntype 2 ไม่ได้รับการสนับสนุนในระบบ 32 บิตและทําให้เกิดข้อผิดพลาด

ส่งกลับค่า

เมื่ออาร์กิวเมนต์returntype เป็น 1 ค่าที่ส่งกลับต่อไปนี้จะระบุโหมดการเข้าถึงไฟล์:

โหมด

ค่า

ข้อมูลที่ป้อนเข้า

1

เอาต์พุต

2

แบบ สุ่ม

4

ผนวก

8

ไบนารี

32

ตัวอย่าง

หมายเหตุ: ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงสําหรับนักพัฒนา ในรายการดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา

ตัวอย่างนี้ใช้ฟังก์ชัน FileAttr เพื่อส่งกลับโหมดไฟล์และตัวจัดการไฟล์ของไฟล์ที่เปิดอยู่ ตัวจัดการไฟล์จะถูกส่งกลับบนระบบ 16 บิตเท่านั้น ในระบบ 32 บิต ที่ส่งผ่าน 2 เป็นอาร์กิวเมนต์ที่สองจะสร้างข้อผิดพลาด

Dim FileNum, Mode, HandleFileNum = 1    ' Assign file number.Open "TESTFILE" For Append As FileNum    ' Open file.Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).Handle = FileAttr(FileNum, 2) ' Returns file handle.Close FileNum    ' Close file.

ต้องการความช่วยเหลือเพิ่มเติมหรือไม่

ต้องการตัวเลือกเพิ่มเติมหรือไม่

สํารวจสิทธิประโยชน์ของการสมัครใช้งาน เรียกดูหลักสูตรการฝึกอบรม เรียนรู้วิธีการรักษาความปลอดภัยอุปกรณ์ของคุณ และอื่นๆ

ชุมชนช่วยให้คุณถามและตอบคําถาม ให้คําติชม และรับฟังจากผู้เชี่ยวชาญที่มีความรู้มากมาย