GetAllSettings 函數

附註: 如果 MicrosoftJet 運算式服務是在沙箱模式中執行,則本主題中所述的函數、方法、物件或屬性會停用,這可防止評估可能不安全的運算式。 有關沙箱模式的詳細資訊,在 「協助」中搜尋「沙箱模式」。

從 Windows 註冊表中的應用程式專案或 Macintosh) 資訊中的 (中,從應用程式專案,從原本使用 SaveSetting) 建立之金鑰設定及其各自值的清單。 (

語法

GetAllSettings ( appname, section)

GetAllSettings 函數語法具有以下引數:

引數

描述

appname

必要。 包含要求金鑰設定之應用程式或 專案 名稱的字串運算式。 在 Macintosh 上,這是系統資料夾中的喜好設定資料夾中初始化檔案的檔案名。

章節

必要。 字串 expression, 其中包含要求按鍵設定之節的名稱。 GetAllSettings 會返回一個 Variant,其內容是包含指定區段 陣列 所有按鍵設定及其對應值的字串之二維陣列。


註解

如果 Appname 或區段不存在,GetAllSettings返回未初始化的 Variant。

範例

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

此範例首先使用 SaveSetting 語句,針對指定為 appname的應用程式在 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"

需要更多協助?

增進您的 Office 技巧
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與我們的其中一個 Office 支援專員連絡以深入了解您的意見。

×