VB - eew - User defined types as parameters for class member functions

[Structural Integrity]

Against my will I am forced to work with VB6 and I want to do some fancy stuff with it that looks a bit like OOP. I know the OO support in VB6 isn't really great (understatement?) but I'm stuck with it, and I still want to use it for some generic "modules".
I'm stuck on using a user defined type as a parameter in a function of a class-module (as it's called in VB6).

'//Class module class1

public function func(aa As MyType) As Integer '//Error here
  'Stuff
end function

public function func2(ByRef aa As MyType) As Integer '//Error here
  'Stuff
end function

'//module modMyModule

Public Type MyType
  memberVar As String
End Type

In the class-module I get the following error:
"Only public user defined types defined in public object modules can be used as parameters or return types for public procedures of class modules or as fields of public user defined types"

That's a mouthfull, but I'm not sure what on earth I'm doing wrong. What's this "Object module" they are talking about in the error? There is no module called "Object module" in the IDE. Just "Module".
How can I use my own types in class functions? Or am I pushing VB6 too far for my needs now?

[JetLinus]

Hm I just tried it, and it indeed seems ****ing annoying. I can't see why this happens and the error message in german is not much more helpful as well. Also the help-button leads me nowhere.
Hm.
Pretty shitty.

Tried to do more than one type-declaration etc, doesn't work. Sad.
But there must be a way around this.


Maybe the concept of userdefined datatypes <-> subclassing doesn't quite work well together?


In the end, WHY do you have MyType? You should be using a class there!

If nothing helps, you may need a wrapper-funktion in a module, that accepts a userdefined datatype and returns and object / class with set properties. No?


And you do have SP6, right?

[Caesar2]

Use

Friend Function

instead of

Public Function

[Structural Integrity]

Originally Posted by JetLinus

In the end, WHY do you have MyType? You should be using a class there!

I'm trying to make a database module and one of the features is to be able to create aliases on a table/column. For this I have an alias type with a string aliasName, tableName and fieldName. Using a class seemed a bit overkill to me at the moment

Originally Posted by JetLinus

If nothing helps, you may need a wrapper-funktion in a module, that accepts a userdefined datatype and returns and object / class with set properties. No?

And you do have SP6, right?

I might try that, and yes, I have SP6 installed.

Originally Posted by Caesar2

Use

Friend Function

instead of

Public Function

Will try this monday when I get back at work.

[Structural Integrity]

\o/ happy happy... it works! \o/
TY!