title: DataMembers parent: VBRUN Package nav_order: 11 permalink: /tB/Packages/VBRUN/DataMembers/
DataMembers 类
DataMembers对象是数据源类在设计时公布的名称集合,使绑定到数据源的消费者可以选择要绑定的成员。每个条目是一个String——数据源可按需提供的数据成员名称。数据源通过Add、Remove和Clear直接管理列表;设计时环境通过Count、Item和For Each迭代读回列表,以填充数据成员选择器。
vb ' 在DataSourceBehavior设置为使其成为数据源的类内部。 Private Sub Class_Initialize() UserControl.DataMembers.Add "Customers" UserControl.DataMembers.Add "Orders" UserControl.DataMembers.Add "Invoices" End Sub
成员
Add
向集合添加数据成员名称。
语法:object.Add DataMember
- object
- 必需 求值为DataMembers对象的对象表达式。
- DataMember
- 必需 给出要添加的数据成员名称的String。名称通常原样呈现给消费者,因此应为可读的标识符。
Clear
从集合中移除所有条目。
语法:object.Clear
- object
- 必需 求值为DataMembers对象的对象表达式。
调用Clear后,Count为�。当数据源可提供的成员集合整体变化时使用——例如,在数据源重新配置后。
Count
返回集合中的名称数量。
语法:object.Count
- object
- 必需 求值为DataMembers对象的对象表达式。
值为Long。Item的有效索引范围从1到Count。
Item
从集合中返回单个数据成员名称。
语法:object.Item( index )
- object
- 必需 求值为DataMembers对象的对象表达式。
- index
- 必需 给出要返回的名称从一开始位置的Long。必须在1和Count之间;否则将发生错误。
Item是DataMembers的默认成员,因此以下两行等效:
vb name = MyDataMembers.Item(1) name = MyDataMembers(1)
结果为String。
Remove
从集合中移除单个条目,按位置或名称标识。
语法:object.Remove index
- object
- 必需 求值为DataMembers对象的对象表达式。
- index
- 必需 标识要移除条目的Variant。如果为数值,则视为1到Count之间从一开始的位置。如果为String,则与先前传递给Add的名称匹配。如果没有匹配的条目,将发生错误。
For Each 迭代
DataMembers对象可以使用For Each...Next语句进行迭代,按添加顺序依次产生每个名称。隐藏的_NewEnum成员提供枚举器,不从用户代码直接调用。
vb Dim Name As Variant For Each Name In MyDataMembers Debug.Print Name Next Name