Applies ToAccess cho Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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 Số nguyên đại diện cho các thuộc tính của tệp, thư mục hoặc thư mục.

Cú pháp

GetAttr ( pathname )

Tên đường dẫn bắttham đối là biểu thức chuỗi xác định tên tệp. Tên đường dẫn có thể bao gồm thư mục hoặc thư mục và ổ đĩa.

Giá trị Trả về

Giá trị do GetAttr trả về là tổng các giá trị thuộc tính sau đây:

Hằng số

Giá trị

Mô tả

vbNormal

0

Bình thường.

vbReadOnly

1

Chỉ đọc.

vbHidden

2

Ẩn.

vbSystem

4

Tệp hệ thống. Không khả dụng trên Macintosh.

vbDirectory

16

Thư mục hoặc thư mục.

vbArchive

32

Tệp đã thay đổi kể từ lần sao lưu cuối cùng. Không khả dụng trên Macintosh.

vbAlias

64

Tên tệp đã xác định là một biệt danh. Chỉ sẵn dùng trên Macintosh.

Lưu ý: Các hằng số này được xác định bởi Visual Basic for Applications. Tên có thể được sử dụng ở bất cứ đâu trong mã của bạn thay cho các giá trị thực tế.

Chú thích

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.

Để xác định thuộc tính nào được đặt, hãy sử dụng toán tử And để thực hiện so sánh bitwise của giá trị do hàm GetAttr trả về và giá trị của thuộc tính tệp riêng lẻ mà bạn muốn. Nếu kết quả không bằng không, thuộc tính đó sẽ được đặt cho tệp đã đặt tên. Ví dụ: giá trị trả về của biểu thức And sau đây là 0 nếu thuộc tính Lưu trữ không được đặt:

Result = GetAttr(FName) And vbArchive

Trả về một giá trị khác không nếu thuộc tính Lưu trữ được đặt.

Ví dụ

Ví dụ này sử dụng hàm GetAttr để xác định các thuộc tính của tệp và thư mục hoặc thư mục. Trên Macintosh, chỉ có các hằng số vbNormal, vbReadOnly, vbHidden và vbAlias mới khả dụng.

Dim MyAttr' Assume file TESTFILE has hidden attribute set.MyAttr = GetAttr("TESTFILE")  ' Returns 2.' Returns nonzero if hidden attribute is ' set on TESTFILE.Debug.Print MyAttr And vbHidden    ' Assume file TESTFILE has hidden and ' read-only attributes set.MyAttr = GetAttr("TESTFILE")  ' Returns 3.' Returns nonzero if hidden attribute is ' set on TESTFILE.Debug.Print MyAttr And (vbHidden + vbReadOnly)    ' Assume MYDIR is a directory or folder.MyAttr = GetAttr("MYDIR")  ' Returns 16.

Bạn cần thêm trợ giúp?

Bạn muốn xem các tùy chọn khác?

Khám phá các lợi ích của gói đăng ký, xem qua các khóa đào tạo, tìm hiểu cách bảo mật thiết bị của bạn và hơn thế nữa.

Cộng đồng giúp bạn đặt và trả lời các câu hỏi, cung cấp phản hồi và lắng nghe ý kiến từ các chuyên gia có kiến thức phong phú.