Функция GetAllSettings

Важно: Тази статия е преведена машинно – вижте отказа от отговорност. Английската версия на тази статия за справка можете да намерите тук .

Забележка: Функция, метод, обект или свойство, описани в тази тема е забранено, ако Microsoft Jet Expression Service се изпълнява в ограничителен режим, който не позволява на оценката на потенциално опасни изрази. За повече информация за ограничителен режим потърсете "ограничителен режим" в "Помощ".

Връща списък с ключови настройки и съответните им стойности (първоначално е създаден с SaveSetting) от записа на приложението в системния регистър на Windows или (в Macintosh) информация в инициализиращия файл на приложението.

Синтаксис

GetAllSettings () appname раздел )

Синтаксисът на функцията GetAllSettings има следните аргументи:

Аргумент

Описание

AppName

Изисква се. Низ израз, съдържащ името на приложението или проект чиито ключови настройки са поискали. В Macintosh това е името на файла на инициализация файл в папката на предпочитания в системната папка.

секция

Изисква се. Низ, eизраз за ограничението , съдържащ името на секцията, чийто ключови настройки са поискали. GetAllSettings връща вариант, чието съдържание е двумерна масив на низове, съдържащи всички ключови настройки в секцията указания и съответните им стойности.


Забележки

GetAllSettings връща Variant неинициализирана ако или appname или секция не съществува.

Пример

Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.

Този пример първо използва SaveSetting команда, за да направи записи в системния регистър на Windows за приложение, зададен като appname, след което използва функцията GetAllSettings за настройки за показване. Имайте предвид, че приложение имена и имена на секция не може да бъде извлечена с GetAllSettings. И накрая DeleteSetting декларация премахва записи на приложението.

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

Забележка: Отказ от отговорност за машинен превод: Тази статия е преведена от компютърна система без човешка намеса. Microsoft предлага тези машинни преводи, за да помогне на потребителите, които не говорят английски, да се възползват от съдържанието за продукти, услуги и технологии на Microsoft. Тъй като статията е преведена машинно, е възможно да съдържа грешки в речника, синтаксиса и граматиката.

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×