Nextrecordset 是什么类型，类模块紧急求助
这样的：
我自己写了个类，

Private adors As ADODB.RecordSet
Private mvarrs As ADODB.RecordSet '

Public adocn As Connection 'cn

Public Sub opensql(sqlstring As String)
On Error GoTo err1:

Set adors = New ADODB.RecordSet
adors.CursorLocation = adUseClient '使用客户端游标
adors.Open sqlstring, adocn, adOpenKeyset, adLockBatchOptimistic
Set mvarrs = adors

Exit Sub
err1:

MsgBox err.Description
End Sub
若干属性省略。。。。

目的是用这个类代替recordset。
但是现在遇到一个问题，就是要用到recordset的 Nextrecordset
语句如下：

Public Property Get Nextrecordset() As '这里不知道写什么类型了

Set Nextrecordset = adors.Nextrecordset
End Property

如果不用这个类型，只要
dim rs as recordset
set rs= new recordset
rs.open。省略。。。。
set rs=rs.nextrecordset

就达到效果了

求高手指点。。。


[解决办法]
个人认为楼主完全没有必要这样做，专业，稳定，可靠的不用。为什么？