Funkcija GetAllSettings

Svarīgi! :  Šis raksts ir mašīntulkots, skatiet atrunu. Lūdzu, skatiet šī raksta versiju angļu valodā šeit jūsu informācijai.

Piezīme : Funkcija, metodi, objektu vai rekvizītu, kas aprakstīts šajā tēmā ir atspējots, ja Microsoft Jet Expression Service ir atvērta smilškastes režīmu, kas neļauj iespējami nedrošās izteiksmes novērtēšanas. Lai iegūtu papildinformāciju par smilškastes režīmu, meklējiet "smilškastes režīma" palīdzībā.

Atgriež sarakstu ar galvenajiem iestatījumi un to attiecīgās vērtības (sākotnēji izveidoja ar SaveSetting) no lietojumprogrammas ievadnes Windows reģistrā vai (Macintosh) lietojumprogrammas inicializācija faila informāciju.

Sintakse

GetAllSettings ( APPNAME % sadaļā )

GetAllSettings sintaksē ir šādi argumenti:

Arguments

Apraksts

APPNAME %

Obligāts. Virknes izteiksme, kas veido lietojumprogrammu vai projekts kura atslēgas iestatījumi tiek pieprasīts nosaukums. Macintosh datorā, tas ir Preferences mapē sistēmas mapē initialization faila nosaukumu.

sadaļas

Obligāts. Virknes expression veido sadaļas, kura atslēgas iestatījumi tiek pieprasīts nosaukums. GetAllSettings atgriež Variant, kura saturs ir divdimensiju masīvs virknes, kas satur visas atslēgas iestatījumus norādītās sadaļas un to atbilstošo vērtību.


Piebildes

GetAllSettings atgriež neinicializētas variants , ja vai nu APPNAME % vai sadaļu nepastāv.

Piemērs.

Piezīme : Turpmākajos piemēros redzama šīs funkcijas izmantošana Visual Basic for Applications (VBA) modulī. Lai iegūtu papildinformāciju par darbu ar VBA, nolaižamajā sarakstā atlasiet Uzziņas materiāli izstrādātājiem blakus meklēšanas lodziņam un ievadiet šajā lodziņā vienu vai vairākus vārdus.

Šajā piemērā vispirms SaveSetting paziņojumu izmanto, lai izveidotu ierakstus Windows reģistrā lietojumprogrammai, kuru norādījāt kā APPNAME %un pēc tam tiek lietota funkcija GetAllSettings lai displeja iestatījumi. Ņemiet vērā, ka lietojumprogrammu un sadaļu nosaukumi nevar izgūt ar GetAllSettings. Visbeidzot, priekšrakstu DeleteSetting noņem lietojumprogrammas ievadnes.

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

Piezīme : Mašīntulkošanas atruna. Šo rakstu ir tulkojusi datorsistēma bez cilvēka iejaukšanās. Microsoft piedāvā šos mašīntulkojumus, lai palīdzētu angliski nerunājošajiem lietotājiem izmanot saturu par Microsoft produktiem, pakalpojumiem un tehnoloģijām. Tā kā šis raksts ir mašīntulkots, tajā var būt leksikas, sintakses un gramatikas kļūdas.

Paplašiniet savas prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Office Insider programmai

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta aģentiem.

×