Funktionen GetAllSettings

Vigtigt: Denne artikel er maskinoversat. Se ansvarsfraskrivelsen. Du kan finde den engelske version af denne artikel her til din orientering.

Bemærk: Den funktion, metode, objekt eller egenskab, der er beskrevet i dette emne er deaktiveret, hvis Microsoft Jet Expression Service kører i sandkassetilstand, hvilket forhindrer evaluering af potentielt usikre udtryk. Du kan finde flere oplysninger om sandkassetilstand, søge efter "sandkassetilstand" i Hjælp.

Returnerer en liste over vigtige indstillinger og deres respektive værdier (oprindeligt blev oprettet med SaveSetting) fra et programs post i Windows-registreringsdatabasen eller (på Macintosh) oplysningerne i programmets initialiseringsfil.

Syntaks

GetAllSettings ( programnavn afsnit )

Syntaksen for funktionen GetAllSettings har følgende argumenter:

Argument

Beskrivelse

Programnavn

Der er påkrævet. Strengudtryk, der indeholder navnet på programmet eller projekt der anmodes om Hvis vigtige indstillinger. På Macintosh er dette filnavnet på initialiseringsfil i mappen indstillinger i mappen System.

sektion

Der er påkrævet. En streng, eudtryk , der indeholder navnet på den sektion, der anmodes om Hvis vigtige indstillinger. GetAllSettings returnerer en Variant, hvis indhold er en todimensional matrix af strenge, der indeholder alle de vigtigste indstillinger i den angivne sektion og deres tilsvarende værdier.


Bemærkninger

GetAllSettings returnerer en initialiserede Variant , hvis programnavn eller sektion ikke findes.

Eksempel

Bemærk: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

I dette eksempel først bruger sætningen SaveSetting til at oprette poster i Windows-registreringsdatabasen for det program, der er angivet som programnavnog derefter bruger funktionen GetAllSettings til at få vist indstillingerne. Bemærk, at programmet navne og sektion ikke kan hentes med GetAllSettings. Til sidst skal fjerner sætningen DeleteSetting 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"

Bemærk: Ansvarsfraskrivelse for maskinoversættelse: Denne artikel er blevet oversat af et computersystem uden menneskelig indgriben. Microsoft tilbyder disse maskinoversættelse for at hjælpe ikke-engelsktalende brugere til at kunne nyde indhold om Microsofts produkter, tjenester og teknologier. Da artiklen er maskinoversat, kan den indeholde forkerte ord eller syntaks- eller grammatikfejl.

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×