我写了一个程式，但由win98升级到win2000后，不能使用，哪位大侠能帮我找找是什么原因！

 
  我在win98下写了一个程式，数据库是sql7.0，用adodb连接，但我把它升级到win2000后，却不能正常运行，出现如下错误提示：  
  compile   error:  
    procedure   declaration   does   not   match,description   of   event   or   procedure   having   the   same   name.  
  光标停在此段代码处：  
  private   sub   datprimaryrs_movecomplete(byval   adreason   as   adodb.eventreasonenum,   byval   perror   as   adodb.error,   adstatus   as   adodb.eventstatusenum,   byval   precordset   as   adodb.recordset)  
     
      datprimaryrs.caption   =   "record:   "   &   cstr(datprimaryrs.recordset.absoluteposition)  
  end   sub  
  哪位大侠能帮我找找是什么原因，或者给个思路也可以。谢了！

参考文章：