vb activeX DLL 的问题，一直不解

Question

我仿照书上新建了一个activeX dll工程，有一个class和一个Form，
form的load中有这么一句  fldCount = rsFrmSource.Fields.Count
（
其中fldCount 是integer，rsFrmSource是在class中，
Public Property Get rsFrmSource() As ADODB.Recordset
    Set rsFrmSource = mrsFrmSource
End Property
）但是运行时显示错误，91，对象变量或with块变量未设置还有就是如何将另一个类的全局变量传过来？？麻烦给以指点！！

Answer 1

同样mrsFrmSource也要对象实例化啊
加上：
Public Property Set rsFrmSource(ByVal Newdata As ADODB.Recordset)
  Set mrsFrmSource = Newdata
End Property'-----------------------------------
传入类全局变量：在窗体里加入
Dim clskk As New clsPrintData
clskk.....