ADODC的小问题！

Question

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
End Sub

Answer 1

这个我也知道啊，问题是后面的半句记录号/总记录数如何显示，记录是一个ACCESS数据库！

Answer 2

cywchina(cywchina)，谢谢，我已经搞定了！