求助，数据库定义问题

[geniushdg]

代码如下：
Private Sub Form_Load()
Dim cnn As New ADODB.Recordset
With cnn
.ActiveConnection = constr
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.LockType = adLockBatchOptimistic
.Open "select * from mmb "
If Not (.EOF And .BOF) Then .MoveFirst
Do While Not .EOF
Combo1.AddItem .Fields("yhm").Value
.MoveNext
Loop
.Close
End With
Set cnn = Nothing
Combo1.Text = Combo1.List(0)
Text2.Text = ""
End Sub

为什么在第一行提示用户类型没有定义？

具体这个数据类型是怎么回事？望高手矛以说明！

[饮水需思源]

要先引用ADO

[geniushdg]

我还不是很明白，，可否详细说明？

[DBIverson]

怎么引用知道吗？project菜单下的references...项。