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

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ề danh sách các cài đặt khóa và giá trị tương ứng của chúng (ban đầu được tạo bằng SaveSetting) từ mục nhập của ứng dụng trong sổ đăng ký Windows hoặc (trên macintosh) thông tin trong tệp khởi tạo của ứng dụng.

Cú pháp

GetAllSettings ( appname , section )

pháp hàm GetAllSettings có các đối số sau đây:

Đối số

Mô tả

tên ứng dụng

Bắt buộc. Biểu thức chuỗi chứa tên của ứng dụng hoặc ứng dự án yêu cầu cài đặt khóa. Trên Macintosh, đây là tên tệp của tệp khởi tạo trong thư mục Tùy chọn trong thư mục Hệ thống.

phần

Bắt buộc. Chuỗi expression chứa tên của phần có yêu cầu cài đặt khóa. GetAllSettings trả về một Biến_thể có nội dung là một chuỗi array hai chiều chứa tất cả các cài đặt chính trong phần được chỉ định và các giá trị tương ứng của chúng.

Chú thích

GetAllSettings trả về một Biến_ thể không được khởi tạo nếu tên ứng dụnghoặc mục không tồn tại.

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 trước tiên sử dụng câu lệnh SaveSetting để tạo các mục nhập trong sổ đăng ký Windows cho ứng dụng được chỉ định là tên ứng dụng, sau đó sử dụng hàm GetAllSettings để hiển thị cài đặt. Lưu ý rằng không thể truy xuất tên ứng dụng và tên phần bằng GetAllSettings. Cuối cùng, câu lệnh DeleteSetting sẽ loại bỏ các mục nhập của ứng dụng.

' Variant to hold 2-dimensional array returned by GetAllSettings' Integer to hold counter.Dim MySettings As Variant, intSettings As Integer' Place some settings in the registry.SaveSetting appname := "MyApp", section := "Startup", _key := "Top", setting := 75SaveSetting "MyApp","Startup", "Left", 50' Retrieve the settings.MySettings = GetAllSettings(appname := "MyApp", section := "Startup")    For intSettings = LBound(MySettings, 1) To UBound(MySettings, 1)        Debug.Print MySettings(intSettings, 0), MySettings(intSettings, 1)    Next intSettingsDeleteSetting "MyApp", "Startup"

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ú.