注意: 如果 Microsoft Jet 表达式服务在沙盒模式下运行，则禁用本主题中所述的函数、方法、对象或属性，这会阻止计算潜在的不安全表达式。 有关沙盒模式的详细信息，请在“帮助”中搜索“沙盒模式”。
从 Windows 注册表中的应用程序条目或 Macintosh 上的 (返回键设置值，) 应用程序初始化文件中的信息。
语法
GetSetting ( appname ， section， key [， default ] )
GetSettin g 函数语法具有以下参数：
|
参数 |
说明 |
|
appname |
必需。 字符串表达式 包含请求其密钥设置的应用程序或项目的名称。 在 Macintosh 上，这是“系统”文件夹中“首选项”文件夹中初始化文件的文件名。 |
|
节 |
必需。 包含在其中找到键设置的节名称的字符串表达式。 |
|
密钥 |
必需。 包含要返回的键设置的名称的字符串表达式。 |
|
默认 |
可选。 如果键设置中未设置值，则包含要返回的值的表达式。 如果省略， 则假定 default 为零长度字符串 (“”) 。 |
备注
如果 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"
