Примітка.
Функція, метод, об’єкт або властивість, описана в цьому розділі, недоступна, якщо Microsoft Jet Expression Service працює в режимі ізольованого програмного середовища, що запобігає обчисленню потенційно небезпечних виразів. Щоб отримати докладні відомості про режим ізольованого програмного середовища, у вікні довідки шукайте за запитом "режим ізольованого програмного середовища".
Повертає значення параметра ключа із запису програми в реєстрі Windows або (на комп'ютерах Macintosh) відомостей у файлі ініціалізації програми.
Синтаксис
GetSetting(appname, section, key [, default ] )
Синтаксис функції GetSetting має такі аргументи:
| Аргумент | Опис |
|---|---|
| appname | — обов’язковий аргумент. Рядковий вираз, що містить ім'я програми або проекту, для якого запитується налаштування ключа. У системі Macintosh це ім'я файлу ініціалізації в папці «Параметри» в папці «Система». |
| розділ | — обов’язковий аргумент. Рядковий вираз, що містить ім'я розділу, де міститься параметр ключа. |
| ключ | — обов’язковий аргумент. Рядковий вираз, що містить назву параметра клавіші, який потрібно повернути. |
| default | — необов’язковий аргумент. Вираз, що містить значення, яке слід повернути, якщо в параметрі ключа не встановлено значення. Якщо його не задано, за замовчуванням використовується рядок нульової довжини (""). |
Примітки
Якщо будь-який з елементів, названих в аргументах GetSetting , не існує, GetSetting повертає значення за замовчуванням.
Приклад
Примітка.
У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі спочатку оператор SaveSetting створює записи в реєстрі Windows (або .ini файлі на 16-розрядних платформах Windows) для програми, указаної як appname, а потім за допомогою функції GetSetting відображається один із параметрів. Оскільки вказано аргумент за промовчанням , гарантовано буде повернуто деяке значення. Зверніть увагу, що імена розділів не можна отримати за допомогою GetSetting. Нарешті, інструкція DeleteSetting видаляє всі записи програми.
' 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"