GetAllSettings funkcija

Pastaba: Norėtume jums kuo greičiau pateikti naujausią žinyno turinį jūsų kalba. Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Gal galite šio puslapio apačioje mums pranešti, ar informacija buvo naudinga? Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip patogia nuoroda.

Pastaba: Funkcija, metodą, objektų ir ypatybių šioje temoje aprašyta yra išjungta, jei Microsoft Jet išraiškų tarnyba veikia smėlio dėžės režimą, kuris trukdo galimai nesaugių reiškinių įvertinti. Daugiau informacijos apie smėlio dėžės režimą, ieškokite "smėlio dėžės režimo" žinyne.

Pateikia pagrindinių parametrų ir atitinkamų jų reikšmių (sukurtų naudojant SaveSetting) sąrašą iš programos įrašo "Windows" registre arba (Macintosh) programos inicijavimo faile informaciją.

Sintaksė

GetAllSettings ( appname skyriuje )

GetAllSettings funkcijos sintaksė turi šiuos argumentus:

Argumentas

Aprašas

appname

Būtina. Eilutės išraiška su taikomosios programos arba projektas , kurio pagrindiniai parametrai prašoma pavadinimą. Macintosh, tai failo aplanke nuostatos sistemos aplanke failo vardą.

sekcijos

Būtina. Eilutės eišraiškos sekcijos, kurios pagrindiniai parametrai prašoma pavadinimas. GetAllSettings grąžina variantą, kurio turinys yra dvimačių masyvas eilutės, kurioje yra visi pagrindiniai parametrai nurodytą ir jų atitinkamų reikšmių.


Pastabos

GetAllSettings grąžina yra Neinicijuotų Variant , jei nėra appname arba sekciją .

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 naudoja sakinio SaveSetting įtraukti įrašą į "Windows" registre nurodytu appnametaikomosios programos, tada naudoja funkciją GetAllSettings Rodyti parametrus. Atkreipkite dėmesį, kad programa vardus ir sekcijų pavadinimai bus prarasti su GetAllSettings. Galiausiai, DeleteSetting sakinį pašalina programos įrašai.

' 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"
Tobulinkite savo „Office“ įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×