Applies ToAccess for Microsoft 365 Access 2021 Access 2019 Access 2016 Access 2013

Huomautus: Tässä ohjeaiheessa kuvattu funktio, menetelmä, objekti tai ominaisuus ei ole käytössä, jos Microsoft Jet Expression Service toimii eristetyssä tilassa, mikä estää mahdollisesti vahingollisten lausekkeiden arvioimisen. Katso lisätietoja eristetystä tilasta ohjeen ”Eristetty tila” -kohdasta.

Palauttaa luettelon tärkeimmistä asetuksista ja niiden arvoista (jotka on alun perin luotu SaveSetting-toiminnolla) sovelluksen windows-rekisterissä olevasta merkinnästä tai (Macintoshissa) sovelluksen alustustiedostossa olevista tiedoista.

Syntaksi

GetAllSettings ( sovelluksen nimi , osa )

GetAllSettings-funktion syntaksissa on seuraavat argumentit:

Argumentti

Kuvaus

sovelluksen nimi

Pakollinen. Merkkijonolauseke, joka sisältää sen sovelluksen tai projekti nimen, jonka avainasetuksia pyydetään. Macintosh-tietokoneella tämä on alustustiedoston tiedostonimi Järjestelmä-kansion Asetukset-kansiossa.

osa

Pakollinen. Merkkijono expression , joka sisältää sen osan nimen, jonka avainasetuksia pyydetään. GetAllSettings palauttaa variantin, jonka sisältö on kaksiulotteinen merkkijonojen matriisi, joka sisältää kaikki määritetyn osan avainasetukset ja niitä vastaavat arvot.

Huomautuksia

GetAllSettings palauttaa alustamattoman variantin , jos sovelluksen nimeä tai osaa ei ole olemassa.

Esimerkki

Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.

Tässä esimerkissä käytetään ensin SaveSetting-lauseketta windows-rekisterin syötteiden tekemiseen sovelluksenimeksi määritetylle sovellukselle ja sitten GetAllSettings-funktiota asetusten näyttämiseen. Huomaa, että sovellusten nimiä ja osien nimiä ei voi noutaa GetAllSettings-toiminnolla. Lopuksi DeleteSetting-lauseke poistaa sovelluksen merkinnät.

' 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 := 75SaveSetting "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 intSettingsDeleteSetting "MyApp", "Startup"

Tarvitsetko lisäohjeita?

Haluatko lisää vaihtoehtoja?

Tutustu tilausetuihin, selaa harjoituskursseja, opi suojaamaan laitteesi ja paljon muuta.

Osallistumalla yhteisöihin voit kysyä kysymyksiä ja vastata niihin, antaa palautetta sekä kuulla lisää asiantuntijoilta, joilla on runsaasti tietoa.