如何在ADODC控件的标题中显示 当前记录/总记录数 字样?并且随记录的改变而改变标题.

[此贴子已经被作者于2006-2-12 13:51:18编辑过]

在窗体里添加如下代码：
Private Sub Adodc1_MoveComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
Adodc1.Caption = "当然记录：" & Adodc1.Recordset.AbsolutePosition & "\" & "总记录数：" & Adodc1.Recordset.RecordCount - 1
End Sub

出现错误提示,"过程声明与同名事什或过程的描述不匹配"把
Adodc1.Caption = "当然记录：" & Adodc1.Recordset.AbsolutePosition & "\" & "总记录数：" & Adodc1.Recordset.RecordCount - 1
放在其它的过程中显示正确.