Office
Logi sisse

Funktsioon GetAllSettings

Märkus.: Soovime pakkuda teie keeles kõige ajakohasemat spikrisisu niipea kui võimalik. See leht on tõlgitud automaatselt ja sellel võib leiduda grammatikavigu või ebatäpsusi. Tahame, et sellest sisust oleks teile abi. Palun märkige selle lehe allservas, kas sellest teabest oli teile kasu või mitte. Soovi korral saab ingliskeelset artiklit lugeda siit.

Märkus.: Kui Microsoft Jet Expression Service töötab liivakastirežiimis, mis takistab potentsiaalselt ebaturvaliste avaldiste väärtustamist, on käesolevas artiklis kirjeldatud funktsioon, meetod, objekt või atribuut keelatud. Liivakastirežiimi kohta lisateabe saamiseks otsige spikrist sõna „liivakastirežiim”.

Tagastab loendi võtme sätted ja nende vastavate väärtuste (algselt loodud Salvesta_säte) rakenduse kirje Windowsi registris või (Macintosh) teavet rakenduse lähtestamise failis.

Süntaks

GetAllSettings ( rakendusenimi jaotis )

GetAllSettings süntaksil on järgmised argumendid.

Argument

Kirjeldus

appname

Nõutav. Avaldis, mis on rakenduse või projekt , mille seaded on nõutav nime sisaldav string. Macintoshi korral on käivitusfaili kausta eelistused süsteemikaustas asuva faili nimi.

jaotis

Nõutav. String eavaldis , mis sisaldab nime, kelle võtme sätted on nõutav osa. GetAllSettings tagastab variandi, mille sisu on stringid, mis sisaldab kõiki võtme seaded määratud jaotis ja nende vastavate väärtuste kahemõõtmeline massiiv .


Kommentaarid

GetAllSettings tagastab on lähtestamata Variant kui kas rakendusenimi või jaotist pole olemas.

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites esmalt lauset SaveSetting et sisestada rakendusenimenamääratud rakenduse jaoks Windowsi registris ja seejärel kasutab funktsioon GetAllSettings sätete kuvamiseks. Pange tähele, et nimede ja jaotiste nimed ei saa tuua GetAllSettingsabil. Viimaks eemaldab lause DeleteSetting rakenduse kirjed.

' 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"
Täiendage Office'i kasutamise oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×