DataGrid控件的使用五
RecordSet事件的编程
也可以对这个Recordset对象的事件进行编程。在该类模块中，单击“对象”框（在位于左上角），然后单击“rsNames”。在“过程/事件”框（在右上角）中，下拉列表将显示这个Recordset对象的所有事件。
给类添加一个属性
类模块也可以进行修改，来响应事件或函数调用。下面的代码演示了如何先给类添加属性。当从其它对象调用该对象时，这一属性将返回该类的RecordCount。
PublicPropertyGetRecordCount()AsLong
RecordCount=rsNames.RecordCount
EndSub
使用DataMember属性
GetDataMember事件也包括DataMember参数。使用这个参数，可以在类模块中包括多个记录集，并使用带DataMember参数的SelectCase语句来返回相应的记录集：
PrivateSubClass_GetDataMember(ByValDataMemberAsString,DataAs_
Object)
SelectCaseDataMember
Case"Names"
SetData=rsNames
Case"Dates"
SetData=rsDates
CaseElse
'设置一个默认的数据成员
SetData=rsYears
EndSelect
EndSub
如果要指定所需的DataMember，请将数据使用者的DataMember属性设置为适当的字符串，然后如平常一样设置DataSource。对于DataGrid控件，可以采用如下方法：
PrivateSubForm_Load()
'创建一个新的NamesData对象
SetdatNames=NewNamesData
'指定所需的DataMember，然后设置DataSource。
DataGrid1.DataMember="Names"
SetDataGrid1.DataSource=datNames
EndSub
- 最新文章
- VB图像处理之像素的获取和输出[04-17]
- VisualBasic移除Form右上方之『X』按钮[04-17]
- VB5.0数据库编程经验小集[04-17]
- 导出EXCEL/FOXPRO/PRODOX格式表[04-17]
- 使机箱内的小喇叭发出不同的声音[04-17]
- VBCOM基础讲座之创建第一个COM对象[04-17]
- 相关文章
- 文件系统控件方案[04-17]
- VB从图片框控件取得颜色[04-17]
- DataCombo和DataList控件的使用二[04-17]
- 用Winsock控件实现文件的下载[04-17]
- VisualBasic中DataCombo和DataList..[04-17]
- VisualBasicCommonDialog控件的使用[04-17]
