AccessObjectProperty 对象代表 AccessObject 对象的一个内部特性或用户定义特性。
每个 AccessObject 对象都包含一个 AccessObjectProperties 集合,而集合中有一个对应于该 AccessObject 对象的属性的 AccessObjectProperty 对象。用户也可以定义 AccessObjectProperty 对象,并将它们追加到某些 AccessObject 对象的 AccessObjectProperties 集合。
可以为下列对象创建用户定义的属性:
? | CodeData、CodeProject、CurrentProject 和 CurrentData 对象 |
? | 下列集合中的 AccessObject 对象: |
CurrentProject 和 CodeProject 对象集合 |
CodeData 和 CodeProject 对象集合 |
注释 从 CurrentData 对象(例如 CurrentData.AllTables!Table1)衍生的对象不能访问 AccessObjectProperties 集合。对于以这种方式衍生的对象,仅可以通过直接调用所需的属性(例如 CurrentData.AllTables!Table1.Name)来访问其内部属性。
为添加用户定义属性,可以使用 Add 方法创建一个 AccessObjectProperty 对象并将其添加到合适对象的 AccessObjectProperties 集合,新的 AccessObjectProperty 对象具有唯一设置的 Name 属性和 Value 属性。要添加用户定义属性的对象必须已经添加到集合中。引用尚未追加到 AccessObjectProperties 集合的用户定义 AccessObjectProperty 对象时会出现发生错误;将用户定义的 AccessObjectProperty 对象追加到包含同名 AccessObjectProperty 对象的 AccessObjectProperties 集合时,也会发生错误。
可以从 AccessObjectProperties 集合中删除用户定义属性。
注释 一个用户定义的 AccessObjectProperty 对象只与对象的一个特定实例相关。属性并不是为选定类型的对象的所有实例定义的。
AccessObjectProperty 对象有两个内部属性:
? | Name 属性,唯一标识某属性的 String。 |
? | Value 属性,包含属性设置的 Variant。 |
若要通过其序号或 Name 属性设置引用集合中的内部或用户定义 AccessObjectProperty 对象,请使用以下语法格式之一:
CurrentProject.AllForms("Form1").Properties(0)
CurrentProject.AllForms("Form1").Properties("name")
CurrentProject.AllForms("Form1").Properties![name]
使用同样的语法格式,还可以引用 AccessObjectProperty 对象的 Value 属性。引用的上下文可以确定是对 AccessObjectProperty 对象自身的引用,还是对 AccessObjectProperty 对象的 Value 属性的引用。
注释 当使用“源代码控件”加载项签入或签出与属性相关的对象时,AccessObjectProperties 集合中的属性并不保存且可以丢失。