一个关于VB类的小问题~~
下面是我的程序的部分VB代码,不知道为什么会出错...
一个activeX DLL工程中,有类CPublic和CUser。
类CPublic用来自定义类型,代码为:
Public Enum gxcAdd
AddOK = 0
AddFail = 1
End Enum
在类CUser中有一个Addnew方法,代码为:
Public Function Addnew(Optional strUserName As String = "", Optional strUserPwd As String = "" _
, Optional strTrueName As String = "", Optional strUserDeptIn As String = "") As gxcAdd
....(中间没有错误)
end function
程序总会出错,提示是“编译错误:private enum 和用户定义类型不能作为参数,公共过程的返回类型、公共数据成员或公共用户定义类型的字段使用!”
请教大虾,这是什么问题,怎么解决,谢谢~~
[解决办法]
看你的代码objClients是一个对象,Find是其一个方法吧?这个方法返回的是CClients对象吗?因为你的rstClients声明为CClients对象...所以Set rstClients = objClients.Find等号二边对象要一致
另外你解决后问题要结贴,如果你不知道这算是友情提醒...
这个问题你开了新贴,前一个问题你还没结,这是我最后一次回这个贴...