GetSetting
从Windows注册表中应用程序条目返回字符串键设置值。
语法：GetSetting( appname , section , key [ , default ] )
- appname
- 字符串表达式，包含请求其键设置的应用程序或项目的名称。
- section
- 字符串表达式，包含键设置所在节的名称。
- key
- 字符串表达式，包含要返回的键设置的名称。
- default
- 可选 Variant表达式，包含当键设置中没有设置值时要返回的值。如果省略，default假定为零长度字符串("")。
如果GetSetting参数中命名的任何项不存在，GetSetting返回default的值。
这些注册表设置的根路径为：Computer\HKEY_CURRENT_USER\Software\VB and VBA Program Settings。
示例
本示例首先使用SaveSetting语句在Windows注册表中为指定为appname的应用程序创建条目，然后使用GetSetting函数显示其中一个设置。由于指定了default参数，保证会返回某个值。注意section名称不能用GetSetting检索。最后，DeleteSetting语句删除所有应用程序条目。
vb
' 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"