注意
如果 Microsoft Jet 運算式服務以沙箱模式執行，則會停用本主題中所述的函數、方法、物件或屬性，這會防止評估可能不安全的運算式。 如需沙箱模式的詳細資訊，請在說明中搜尋「沙箱模式」。
傳回最初使用 SaveSetting 建立 () 來自 Windows 登錄中的應用程式項目或 Macintosh 上 () 應用程式初始化檔案中資訊的重要設定及其各自值的清單。
語法
GetAllSettings (appname， section)
GetAllSettings 函數語法具有下列引數：
| 引數 | 描述 |
|---|---|
| 應用程式名稱 | 必要。 包含要求其金鑰設定之應用程式或專案名稱的字串運算式。 在 Macintosh 上，這是 [系統] 資料夾中 [喜好設定] 資料夾中初始化檔案的檔案名稱。 |
| 章節 | 必要。 包含要求按鍵設定之區段名稱的字串 運算式 。 GetAllSettings 會傳回一個 Variant，其內容是字串的二維陣列，其中包含指定區段中的所有索引鍵設定及其對應值。 |
註解
如果應用程式名稱或區段不存在，GetAllSettings 會傳回未初始化的變體。
範例
注意
下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊，請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考]，並在 [搜尋] 方塊中輸入一個或多個字詞。
此範例會先使用 SaveSetting 陳述式，在 Windows 登錄中為指定為 appname 的應用程式建立項目，然後使用 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"