当然有了
Private Sub rs_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
RecNum.Text = rs.AbsolutePosition & "/" & rs.RecordCount
End Sub以上是指针移动完成事件,我利用此事件来显示记录号:如2/9
共9条记录,现在是第2条。

解决方案 »

  1.   

    如 insertbefore updatbefore 等等 看一看有关控件的书
      

  2.   

    是呀,有的比如在更新前,更新完毕等等willupdate  updatecomplete
    不好意思,忘了怎么打了,找找书吧,会有的,要不,用对象浏览器看一看!!
      

  3.   

    dim withevents rs as adodb.recordsetsub form_load()
    set rs=new adodb.recordset
    end sub
     
    这样一来,你在代码窗口就可以和别的控件一样看到它的事件了.
      

  4.   

    用ADO控件当然有事件,但记录集应该没有事件吧!!!!