编译错误：用户定义类型未定义
Private Sub CommandButton1_Click()
  Dim cn As ADODB.Connection
  Dim rs As ADODB.Recordset
  Dim mysql As String
  Dim mystr As String


这样写有问题么？复制过来的 原来的运行没问题 到这边就出编译错误 请哪位大侠指点下

------解决方案--------------------
参照dao 回复内容太短了！
------解决方案--------------------
检查引用中是否有ADO
------解决方案--------------------
检查你的VBA项目中的引用，是否有ADO的引用。