Hinweis
Die in diesem Thema beschriebene Funktion, Methode, das Objekt oder die Eigenschaft ist deaktiviert, wenn der Microsoft Jet-Ausdrucksdienst im Sandkastenmodus ausgeführt wird, der die Auswertung potenziell unsicherer Ausdrücke verhindert. Weitere Informationen zum Sandboxmodus finden Sie, wenn Sie in der Hilfe nach "Sandboxmodus" suchen.
Gibt einen Wert für eine Schlüsseleinstellung aus einem Anwendungseintrag in der Windows-Registrierung bzw. (auf einem Macintosh-Computer) Informationen in der Initialisierungsdatei der Anwendung zurück.
Syntax
GetSetting(appname, section, key [, default ] )
Die Syntax der Funktion GetSetting weist die folgenden Argumente auf:
| Argument | Beschreibung |
|---|---|
| appname | Erforderlich. Zeichenfolgenausdruck mit dem Namen der Anwendung oder des Projekts, deren Schlüsseleinstellung angefordert wird. Auf dem Macintosh ist dies der Dateiname der Initialisierungsdatei im Ordner "Einstellungen" im Ordner "System". |
| section | Erforderlich. String-Ausdruck mit dem Namen des Abschnitts, mit dem Namen des Abschnitts, in dem sich die Schlüsseleinstellung befindet. |
| key | Erforderlich. String-Ausdruck mit dem Namen der zurückzugebenden Schlüsseleinstellung. |
| default | Optional. Ausdruck mit dem Wert, der zurückgegeben werden soll, wenn in der "Key"-Einstellung kein Wert festgelegt ist. Wenn er weggelassen wird, wird standardmäßig eine leere Zeichenfolge ("") angenommen. |
Hinweise
Wenn keines der in den GetSetting-Argumenten benannten Elemente vorhanden ist, gibt GetSetting den Standardwert zurück.
Beispiel
Hinweis
Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.
Dieses Beispiel verwendet zunächst die SaveSetting-Anweisung , um Einträge in der Windows-Registrierung (oder .ini Datei auf 16-Bit-Windows-Plattformen) für die als appname angegebene Anwendung vorzunehmen, und dann wird die GetSetting-Funktion verwendet, um eine der Einstellungen anzuzeigen. Da das Standardargument angegeben wird, wird garantiert ein Wert zurückgegeben. Beachten Sie, dass Abschnittsnamen nicht mit GetSetting abgerufen werden können. Schließlich entfernt die DeleteSetting-Anweisung alle Einträge der Anwendung.
' 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"