Megjegyzés: A témakörben ismertetett függvény, metódus, objektum vagy tulajdonság le van tiltva, ha a Microsoft Jet Expression Service védőfalas üzemmódban fut, mivel ez megakadályozza az esetleg nem biztonságos kifejezések kiszűrését. A védőfalas üzemmódról a súgóban a „védőfalas üzemmód” kifejezésre keresve talál további információt.
Egy kulcsbeállítási értéket ad vissza egy alkalmazás Bejegyzéséből a Windows beállításjegyzékében vagy (Macintosh rendszeren) az alkalmazás inicializálási fájljában.
Szintaxis
GetSetting ( appname , section, key [, default ] )
A GetSetting függvény szintaxisa az alábbi argumentumokat foglalja tartalmazza:
argumentumok |
Leírás |
appnév |
Kötelező megadni. karakterlánc-kifejezés annak az alkalmazásnak vagy projektnek a nevét tartalmazza, amelynek kulcsbeállítását kéri. Macintosh rendszeren ez az inicializálási fájl fájlneve a Rendszer mappa Beállítások mappájában. |
szakasz |
Megadása kötelező. Sztringkifejezés, amely annak a szakasznak a nevét tartalmazza, ahol a kulcsbeállítás található. |
billentyű |
Megadása kötelező. Sztringkifejezés, amely a visszaadni kívánt kulcsbeállítás nevét tartalmazza. |
alapértelmezés |
Nem kötelező. A visszaadni kívánt értéket tartalmazó kifejezés, ha nincs beállítva érték a kulcsbeállításban. Ha nincs megadva, a default nulla hosszúságú sztring ("") lesz. |
Megjegyzések
Ha a GetSetting argumentumokban szereplő egyik elem sem létezik, a GetSetting az alapértelmezett értéket adja vissza.
Példa
Megjegyzés: A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Ez a példa először a SaveSetting utasítással tesz bejegyzéseket a Windows beállításjegyzékében (vagy .ini fájlban 16 bites Windows-platformokon) az alkalmazásnévként megadott alkalmazáshoz, majd a GetSetting függvénnyel megjeleníti az egyik beállítást. Mivel az alapértelmezett argumentum meg van adva, a rendszer bizonyos értékeket garantáltan visszaad. Vegye figyelembe, hogy a szakasznevek nem kérhetők le a GetSetting használatával. Végül a DeleteSetting utasítás eltávolítja az alkalmazás összes bejegyzését.
' Variant to hold 2-dimensional array returned
' by GetSetting. Dim MySettings As Variant ' Place some settings in the registry. SaveSetting "MyApp","Startup", "Top", 75 SaveSetting "MyApp","Startup", "Left", 50 Debug.Print GetSetting(appname := "MyApp", _ section := "Startup", _ key := "Left", default := "25") DeleteSetting "MyApp", "Startup"