RecordSet事件的編程
　　　　也可以對這個Recordset對象的事件進行編程。在該類模塊中，單擊“對象”框（在位于左上角），然后單擊“rsNames”。在“過程/事件”框（在右上角）中，下拉列表將顯示這個Recordset對象的所有事件。

　　　　給類添加一個屬性
　　　　類模塊也可以進行修改，來響應事件或函數調用。下面的代碼演示了如何先給類添加屬性。當從其它對象調用該對象時，這一屬性將返回該類的RecordCount。
　　　　Public　　　　　　　DataGrid1.DataMember="Names"
　　　　　　　SetDataGrid1.DataSource=datNames
　　　　EndSub