Office
Logi sisse

Funktsioon GetSetting

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 Windowsi registri rakendusekirjest vastava registrivõtme sätte väärtuse või (Macintoshis) rakenduse käivitusfaili teabe.

Süntaks

GetSetting ( rakendusenimi , jaotis, võti [, vaikesäte ] )

Funktsiooni GetSetting süntaksil on järgmised argumendid.

Argument

Kirjeldus

rakendusenimi

Nõutav. Rakenduse või projekti, mille registrivõtme sätet taotletakse, nimetust sisaldav stringavaldis. Macintoshi korral on selleks kaustas „System“ („Süsteem“) asuvas kaustas „Preferences“ („Eelistused“) oleva käivitusfaili nimi.

jaotis

Nõutav. Registrivõtme sätte asukohaks oleva jaotise nimetust sisaldav stringavaldis.

võti

Nõutav. Tagastatava registrivõtme nimetust sisaldav stringavaldis.

vaikesäte

Valikuline. Stringavaldis, mis sisaldab tagastatavat väärtust juhul, kui registrivõtme sätte väärtust pole määratud. Kui see ära jäetakse, eeldatakse, et vaikesäte on nullpikkusega string ("").


Kommentaarid

Juhul kui funktsiooni GetSetting argumentides nimetatud üksusi pole, tagastab GetSettingvaikesätte väärtuse.

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 kasutatakse esmalt Windowsi registris või 16-bitise Windowsi platvormi käivitusfailis (.ini) rakenduse rakendusenimi kirjete tegemiseks lauset SaveSetting ning seejärel ühe sätte kuvamiseks funktsiooni GetSetting. Kuna määratud on väärtus vaikesäte, tagastatakse mõni väärtus kindlasti. Võtke arvesse, et jaotise nimetusi funktsiooniga GetSetting tuua ei saa. Lõpuks eemaldatakse lauset DeleteSetting kasutades kõik rakenduse kirjed.

' Variant to hold 2-dimensional array returned 
' by GetSetting.
Dim MySettings As Variant
' Place some settings in the registry.
SaveSetting "MyApp","Startup", "Top", 75
SaveSetting "MyApp","Startup", "Left", 50
Debug.Print GetSetting(appname := "MyApp", _
section := "Startup", _
key := "Left", default := "25")
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.

×