Applies ToAccess для Microsoft 365 Access 2021 Access 2019 Access 2016 Access 2013

Примітка.: Функція, метод, об’єкт або властивість, описана в цьому розділі, недоступна, якщо Microsoft Jet Expression Service працює в режимі ізольованого програмного середовища, що запобігає обчисленню потенційно небезпечних виразів. Щоб отримати докладні відомості про режим ізольованого програмного середовища, у вікні довідки шукайте за запитом "режим ізольованого програмного середовища".

Повертає список параметрів ключів і відповідних значень (спочатку створених за допомогою SaveSetting) із запису програми в реєстрі Windows або (в Macintosh) у файлі ініціалізації програми.

Синтаксис

GetAllSettings ( appname , section )

Синтаксис функції GetAllSettings має такі аргументи:

Аргумент

Опис

appname

Обов’язковий аргумент. Рядковий вираз, що містить ім'я програми або проект, для яких запитано параметри ключа. У системі Macintosh це ім'я файлу ініціалізації в папці Параметри в папці Система.

розділ

— обов’язковий аргумент. String expression containing the name of the section whose key settings are requested. Функція GetAllSettings повертає значення variant, вміст якого є двовимірним масив рядків, що містить усі параметри ключів у вказаному розділі та відповідні значення.

Примітки

Функція GetAllSettings повертає неініціалізований варіант , якщо назва програми або розділу не існує.

Приклад

Примітка.: У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.

У цьому прикладі спочатку використовується оператор SaveSetting , щоб створювати записи в реєстрі Windows для програми, указаної як ім'я програми, а потім за допомогою функції 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 := 75SaveSetting "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 intSettingsDeleteSetting "MyApp", "Startup"

Потрібна додаткова довідка?

Потрібні додаткові параметри?

Ознайомтеся з перевагами передплати, перегляньте навчальні курси, дізнайтесь, як захистити свій пристрій тощо.

Спільноти допомагають ставити запитання й відповідати на них, надавати відгуки та дізнаватися думки висококваліфікованих експертів.