GetAllSettings 函式

從Windows 登錄中的應用程式專案或 Macintosh 上的 ( (，傳回最初使用SaveSetting) 建立的金鑰設定及其個別值清單，) 應用程式初始化檔案中的資訊。

語法

GetAllSettings (appname， section)

GetAllSettings函式語法具有下列具名引數：

部分	描述
appname	此為必要動作。 字串表達 式，包含要求其索引鍵設定之應用程式或 專案的 名稱。 在 Macintosh 中，這是初始化檔案系統資料夾中的 喜好設定資料夾中的檔案名稱。
區段	此為必要動作。 字串 表達 式，包含要求其索引鍵設定的區段名稱。 GetAllSettings 會 傳回 Variant ，其內容是包含指定區段中所有索引鍵設定及其對應值的字串二維 數 組。

註解

如果appname或區段不存在，GetAllSettings會傳回未初始化的Variant。

範例

此範例會先使用 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"

另請參閱

• 函式 (Visual Basic for Applications)

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。