注意
如果 Microsoft Jet 表达式服务在沙盒模式下运行，则本主题中描述的函数、方法、对象或属性将被禁用，这会阻止对潜在不安全表达式进行评估。 有关沙盒模式的详细信息，请在帮助中搜索“沙盒模式”。
从 Windows 注册表中的应用程序项或 Macintosh 上的 (返回应用程序初始化文件中) 信息的键设置值。
语法
GetSetting (appname， section， key [， default ] )
GetSetting 函数语法具有以下参数：
| 参数 | 说明 |
|---|---|
| 应用名称 | 必需。 包含请求其键设置的应用程序或项目名称的字符串表达式。 在 Macintosh 中，这是“系统”文件夹中“首选项”文件夹中初始化文件的文件名。 |
| 节 | 必需。 包含找到键设置的部分名称的字符串表达式。 |
| 密钥 | 必需。 包含要返回的键设置名称的字符串表达式。 |
| 默认 | 可选。 表达式，其中包含在键设置中未设置值时要返回的值。 如果省 略，默认 值将假定为零长度字符串 (“”) 。 |
备注
如果 GetSetting 参数中指定的任何项不存在， GetSetting 返回 默认值。
示例
注意
下面的示例演示了在Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息，请在“搜索”旁边的下拉列表中选择“开发人员参考”，然后在搜索框中输入一个或多个术语。
此示例首先使用 SaveSetting 语句在 16 位 Windows 平台上的 Windows 注册表 (或 .ini 文件中为指定为 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"