具体代码如下:
Option Explicit
Private m_txtbox As TextBoxPublic Property Let tdbgrid(ByVal RHS As TextBox)
    Set txtbox = RHS
End Property生成时提示:
      编译错误:
      private 对象模块不能作为参数、公共过程的返回类型、公共数据成员或公共用户定义类型字段在公共对象中使用如果是普通变量,如double,就没有问题!
请大家帮助!