在下面自动生成的过程里,缺少类型定义。请问:我该怎么样定义?定义哪个变量?在哪个过程里定义?谢谢!三鞠躬!!!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