再問應用程式精靈作的程式(編號:5140)

謝謝小琳的指教,可是仍然無法除錯,以下是用應用程式精靈作出的程式,執行後的錯誤訊息:使用者自定型態尚未定義
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
其中datPrimaryRS是ADO Data控制項的Name
請問ADODB是如何出現的,有什麼作用,為何會出現這個錯誤訊息?