求助，数据库定义问题

Question

代码如下：
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为什么在第一行提示用户类型没有定义？具体这个数据类型是怎么回事？望高手矛以说明！

Answer 1

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