Logga in med Microsoft
Logga in eller skapa ett konto.
Hej,
Välj ett annat konto.
Du har flera konton
Välj det konto som du vill logga in med.

Obs!: Funktionen, metoden, objektet eller egenskapen som beskrivs i det här avsnittet inaktiveras om Microsoft Jet Expression Service körs i begränsat läge, vilket förhindrar utvärderingen av potentiellt osäkra uttryck. Om du vill ha mer information om begränsat läge söker du efter "begränsat läge" i hjälpen.

Returnerar en lista med nyckelinställningar och deras respektive värden (som ursprungligen skapades med SaveSetting) från ett program i Windows-registret eller (på Macintosh)-informationen i programmets initieringsfil.

Syntax

GetAllSettings ( appname , section )

Syntaxen för funktionen GetAllSettings har följande argument:

Argument

Beskrivning

appname

Obligatoriskt. Stränguttryck som innehåller namnet på programmet eller projekt vars nyckelinställningar begärs. På Macintosh-datorer är det här filnamnet på initieringsfilen i mappen Inställningar i mappen System.

avsnitt

Obligatoriskt. Sträng expression som innehåller namnet på avsnittet vars nyckelinställningar begärs. GetAllSettings returnerar en variant vars innehåll är en tvådimensionell matris med strängar som innehåller alla nyckelinställningar i det angivna avsnittet och motsvarande värden.


Kommentarer

GetAllSettings returnerar en variant som inte har initierats omappnamn eller avsnitt inte finns.

Exempel

Obs!: I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA). Om du vill läsa mer om hur man använder VBA, kan du välja Info för utvecklare i listrutan bredvid Sök och sedan skriva en eller flera söktermer i sökrutan.

I det här exemplet används först SaveSetting-instruktionen för att göra poster i Windows-registret för programmet som anges som appnamn och sedan används funktionen GetAllSettings för att visa inställningarna. Observera att programnamn och avsnittsnamn inte kan hämtas med GetAllSettings. Slutligen tar DeleteSetting-instruktionen bort programmets poster.

' 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"

Behöver du mer hjälp?

Vill du ha fler alternativ?

Utforska prenumerationsförmåner, bläddra bland utbildningskurser, lär dig hur du skyddar din enhet med mera.

Communities hjälper dig att ställa och svara på frågor, ge feedback och få råd från experter med rika kunskaper.

Hade du nytta av den här informationen?

Hur nöjd är du med språkkvaliteten?
Vad påverkade din upplevelse?
Genom att trycka på skicka, kommer din feedback att användas för att förbättra Microsofts produkter och tjänster. IT-administratören kan samla in denna data. Sekretesspolicy.

Tack för din feedback!

×