GetAllSettings Function

Syntax

GetAllSettings(AppName$, Section$)

Group

Settings

Description

Get all of Section's settings in project AppName. Settings are returned in a Variant. Empty is returned if there are no keys in the section. Otherwise, the Variant contains a two dimension array: (I,0) is the key and (I,1) is the setting. Win16 and Win32s store settings in a .ini file named AppName. Win32/Win64 store settings in the registration database under "HKEY_CURRENT_USER\ Software\ VB and VBA Program Settings\ AppName\ Section\ Key". If AppName starts with "..\" then "VB and VBA Program Settings\" is omitted.

Sandbox

Sandbox mode blocks this function.

Parameters	Description
AppName$	This string value is the name of the project which has this Section and Key.
Section$	This string value is the name of the section of the project settings.

---

Sub Main
    SaveSetting "MyApp","Font","Size",10
    SaveSetting "MyApp","Font","Name","Courier"
    Settings = GetAllSettings("MyApp","Font")
    For I = LBound(Settings) To UBound(Settings)
        Debug.Print Settings(I,0); "="; Settings(I,1)
    Next I
    DeleteSetting "MyApp","Font"
End Sub