GetProperty 函数
简介
获取并返回指定对象的指定属性。
语法
GetProperty(Object, PropertyName, DefaultValue)
输入参数
| 参数名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Object | 必需 | Object | 任意对象。 |
| PropertyName | 必需 | String | 属性名称 |
| DefaultValue | 必需 | Variant | 如果属性不存在时返回此默认值。 |
返回值
如果属性存在返回相应的属性值。如果属性不存在则返回 DefaultValue 参数指定的默认值。
说明
GetProperty 和 SaveProperty 一起成对使用，一个用于读取属性，一个用于写入修改属性。
相关
示例
Dim strText As String
SaveProperty CurrentDb.TableDefs("表1").Fields("字段1"), "Caption", dbText, "字段1_A"
strText = GetProperty(CurrentDb.TableDefs("表1").Fields("字段1"), "Caption", "字段1")
MsgBox "表1中字段1的标题已被修改为" & strText
修订记录
2019-01-06 完善内容。