为何提示类型错误

leap3

DIM MY_DB AS DATABASE
  DIM MY_TB AS RECORDSET
  SET MY_DB =CURRENTDB
  SET MY_TB =MY_DB.OPENRECORDSET("通信录")
  my_tb.addnew
  my_tb.update

已引用BAO3.6，运行到第4行时，为何提示类型错误

leap3

thank

Trynew

看过你上一贴，第二行改为IM MY_TB AS Dao.RECORDSET。
你也可以检查引用，把ADO引用和其他可能引起冲突的去掉试一下。