新手问题Private WithEvents rsUnread As ADODB.Recordset

Question

WithEvents 可选的。关键字，说明 varname 是一个用来响应由 ActiveX 对象触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents，可以声明任意个所需的单变量，但不能使用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。

Answer 1

带事件
可选的。关键字，说明 varname 是一个用来响应由 ActiveX 对象触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents，可以声明任意个所需的单变量，但不能使用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。

Answer 2

使rsUnread拥有ADODB.Recordset这个对象的事件

Answer 3

这样声明后，rsUnread 就出现在模块“代码”窗口左边的下拉菜单上，就成带事件得对象了。具体怎么用参见MSDN，讲得很详细。

Answer 4

WithEvents 可选的。关键字，说明 varname 是用来响应由 ActiveX 对象所触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents，可以定义任意个所需的单变量，但不能用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。 
用WithEvents定义rsUnread后，rsUnread就做为一个对象拥有事件了
在模块“代码”窗口左边的下拉菜单中找rsUnread,在右边的下拉菜单中找相应事件