Skip to content

DataMembers 类

DataMembers对象是数据源类在设计时公布的名称集合,使绑定到数据源的消费者可以选择要绑定的成员。每个条目是一个String——数据源可按需提供的数据成员名称。数据源通过AddRemoveClear直接管理列表;设计时环境通过CountItemFor 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对象的对象表达式。

值为LongItem的有效索引范围从1到Count

Item

从集合中返回单个数据成员名称。

语法:object.Item( index )

object
必需 求值为DataMembers对象的对象表达式。
index
必需 给出要返回的名称从一开始位置的Long。必须在1和Count之间;否则将发生错误。

ItemDataMembers的默认成员,因此以下两行等效:

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

twinBASIC及其LOGO版权为作者"韦恩"所有