注意
若 Microsoft Jet Expression Service 以沙盒模式執行，則本主題所述的函式、方法、物件或屬性將被禁用，避免評估潛在不安全的表達式。 想了解更多沙盒模式的資訊，請在說明中搜尋「sandbox mode」。
回傳一份 (原始使用 SaveSetting) 從應用程式登錄檔或 Macintosh) 初始化檔案中 (建立的金鑰設定清單及其相應值。
語法
GetAllSettings (應用程式名稱，區塊)
GetAllSettings 函式語法包含以下參數：
| 引數 | 描述 |
|---|---|
| 應用程式名稱 | 必要。 包含被請求的應用程式或專案名稱的字串表達式。 在 Macintosh 上，這是系統資料夾中偏好設定資料夾中初始化檔案的檔名。 |
| 章節 | 必要。 包含被請求鍵設定區段名稱的字串 表達 式。 GetAllSettings 回傳一個 Variant，其內容是一個二維字串陣列，包含指定區段中的所有金鑰設定及其對應值。 |
註解
如果應用程式名稱或區段不存在，GetAllSettings 會回傳一個未初始化的 Variant。
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊，請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考]，並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例首先使用 SaveSetting 陳述式在 Windows 登錄檔中為指定的 應用程式建立項目，接著使用 GetAllSettings 函式顯示設定。 請注意，應用程式名稱和 區段 名稱無法用 GetAllSettings 取得。 最後， DeleteSetting 陳述式會移除應用程式的條目。
' 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 := 75
SaveSetting "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 intSettings
DeleteSetting "MyApp", "Startup"