Примечание
Функция, метод, объект или свойство, описанные в данном разделе, отключаются, если служба обработки выражений Microsoft Jet выполняется в режиме песочницы, который не позволяет рассчитывать потенциально небезопасные выражения. Для получения дополнительных сведений выполните в справке поиск по словам "режим песочницы".
Возвращает значение параметра раздела из записи приложения в реестре Windows либо файле инициализации приложения (для macOS).
Синтаксис
GetSetting(appname, section, key [, default ] )
Синтаксис функции GetSetting имеет следующие аргументы:
| Аргумент | Описание |
|---|---|
| имя_приложения | — обязательный аргумент. строковое выражение, содержащее имя приложения или проекта, для которого запрашивается параметр ключа. На компьютерах Macintosh это имя файла инициализации в папке "Настройки" папки "Система". |
| раздел | Обязательный аргумент. Строковое выражение, содержащее имя области, в которой находится параметр. |
| раздел | Обязательный аргумент. Строковое выражение, содержащее имя параметра раздела, который требуется вернуть. |
| по_умолчанию | Необязательный аргумент. Выражение, содержащее значение, возвращаемое, если не задано значение в параметре раздела. Если этот параметр опущен, предполагается, что по умолчанию используется строка нулевой длины (""). |
Замечания
Если какой-либо из элементов, именованных в аргументах GetSetting , не существует, Метод GetSetting возвращает значение по умолчанию.
Пример
Примечание
В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (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"