Lưu ý: Hàm, phương pháp, đối tượng hoặc thuộc tính được mô tả trong chủ đề này sẽ bị vô hiệu hóa nếu Dịch vụ Biểu thức Phản lực của Microsoft đang chạy trong chế độ hộp cát, điều này ngăn không cho đánh giá các biểu thức không an toàn tiềm ẩn. Để biết thêm thông tin về chế độ hộp cát, hãy tìm kiếm "chế độ hộp cát" trong Trợ giúp.
Trả về một giá trị kiểu Dài thể hiện chế độ tệp cho các tệp được mở bằng câu lệnh Open .
Cú pháp
FileAttr ( filenumber , returntype )
Cú pháp hàm FileAttr có các đối số sau đây:
Đối số |
Mô tả |
số tệp |
Bắt buộc. Integer. Bất kỳ tài khoản hợp số tệp. |
returntype |
Bắt buộc. Số nguyên. Số cho biết loại thông tin cần trả về. Chỉ định 1 để trả về giá trị cho biết chế độ tệp. Chỉ trên hệ thống 16 bit, chỉ định 2 để truy xuất một điều khiển tệp hệ điều hành. returntype 2 không được hỗ trợ trong hệ thống 32 bit và gây ra lỗi. |
Giá trị Trả về
Khi kiểu trả về làtham đối 1, các giá trị trả về sau đây cho biết chế độ truy nhập tệp:
Mode |
Giá trị |
Phương thức nhập |
1 |
Đầu ra |
2 |
Ngẫu nhiên |
4 |
Chắp thêm |
8 |
Nhị phân |
32 |
Ví dụ
Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.
Ví dụ này sử dụng hàm FileAttr để trả về chế độ tệp và điều khiển tệp của tệp đang mở. Xử lý tệp chỉ được trả về trên hệ thống 16 bit; trên hệ thống 32 bit, việc truyền 2 làm đối số thứ hai sẽ tạo ra lỗi.
Dim FileNum, Mode, Handle
FileNum = 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.