Hinweis
Die in diesem Thema beschriebene Funktion, Methode, Objekt oder Eigenschaft ist deaktiviert, wenn der Microsoft Jet-Ausdrucksdienst im Sandboxmodus 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, der den Namen der Anwendung oder des Projekts enthält, 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 diese Angabe nicht angegeben wird, wird davon ausgegangen, dass der Standardwert eine Zeichenfolge der Länge null ("") ist. |
Hinweise
Wenn eines der in den GetSetting-Argumenten benannten Elemente nicht vorhanden ist, gibt GetSetting den Wert von default 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.
In diesem Beispiel wird zunächst die SaveSetting-Anweisung verwendet, um Einträge in der Windows-Registrierung (oder .ini-Datei auf 16-Bit-Windows-Plattformen) für die als App-Name angegebene Anwendung vorzunehmen, und dann wird die GetSetting-Funktion verwendet, um eine der Einstellungen anzuzeigen. Da das Standardargument angegeben ist, 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"