＋设为首页 ＋添加到收藏夹
我想将一个类模块转换成为一个OCX文件，但里面用到了一个需要窗体对象的函数，我定义了，但程序报错"private对象模块不能作为参数，公共过程的返回类型", 请大家帮忙。如下：
Dim fm As Form
Property Get frm() As Form
frm = fm
End Property
Public Property Let frm(ByVal vNewValue As Form)
fm = vNewValue
End Property
问题出在定义类型上 既 as form 出错。。
我不知道你的具体要求。。用FORM肯定是不行。。你试试 定义 成 CONTROL
或是variant 试试能否满足你的要求。。。
ByVal改为ByRef试试
对象能用值传递吗？我认为对象都是用引用传递的
ByVal vNewValue As Form
改为
ByVal vNewValue As object
