Applies To„Access“, skirta „Microsoft 365“ Access 2021 Access 2019 Access 2016 Access 2013

Pastaba: Šioje temoje aprašyta funkcija, metodas, objektas arba ypatybė yra išjungta, jei "Microsoft Jet Expression Service" veikia smėlio dėžės režimu, kuris neleidžia įvertinti galimai nesaugių reiškinių. Jei reikia daugiau informacijos apie smėlio dėžės režimą, žinyne ieškokite "smėlio dėžės režimas".

Grąžina pagrindinių parametrų ir atitinkamų jų reikšmių (sukurtų naudojant SaveSetting) sąrašą iš programos įrašo Windows registre arba (Macintosh kompiuteryje) informacijos programos inicijavimo faile.

Sintaksė

GetAllSettings ( appname , section )

Funkcijos GetAllSettings sintaksė turi tokius argumentus:

Argumentas

Aprašas

taikomosios programos pavadinimas

Būtinas. Eilutės reiškinys, kuriame yra programos arba projektas, kurios raktų parametrų prašoma, pavadinimas. Macintosh kompiuteryje tai yra inicijavimo failo vardas aplanke Nuostatos, kuris yra aplanke Sistema.

skyrius

Būtinas. String expression containing the name of the section whose key settings are requested. GetAllSettings pateikia variantą, kurio turinys yra dvimatis eilučių, kuriose yra visi nurodytos sekcijos pagrindiniai parametrai ir atitinkamos jų reikšmės, masyvas.

Pastabos

GetAllSettings pateikia neinicijuotą variantą , jei nėra programėlės pavadinimo arba sekcijos .

Pavyzdys

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje pirmiausia naudojamas sakinys SaveSetting , kad būtų galima įvesti programos, nurodytos kaip appname, įrašus "Windows" registre, tada naudoti funkciją GetAllSettings parametrams rodyti. Atkreipkite dėmesį, kad programų pavadinimų ir sekcijų pavadinimų negalima gauti naudojant GetAllSettings. Galiausiai sakinys DeleteSetting pašalina programos įrašus.

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

Reikia daugiau pagalbos?

Norite daugiau parinkčių?

Sužinokite apie prenumeratos pranašumus, peržiūrėkite mokymo kursus, sužinokite, kaip apsaugoti savo įrenginį ir kt.

Bendruomenės padeda užduoti klausimus ir į juos atsakyti, pateikti atsiliepimų ir išgirsti iš ekspertų, turinčių daug žinių.