Assign a UDT to a variant array?

[rjlohan]

I am trying (in a .bas module) to assign a UDT (declared in the same module) to a variant array (in the same module). I get this error:

"You attempted to use a public user defined type as a parameter or return type for a public procedure of a class module, or as a field of a public user defined type. Only public user defined types that are defined in a public object module can be used in this manner. "


*** does that all mean?? And how do I resolve this?

[BuggyProgrammer]

mabye try making the UDT public?

[rjlohan]

Done that. Don't work.

[crptcblade]

What kind of project is it, a DLL?

[rjlohan]

Just a McRegular .exe.

'Declarations:
'Single choice question
Private Type QuestionSC
    qtQuestionType As QuestionType
    strQuestion As String
    audFilename As String
End Type
 
'Question list
Private varQuestionList As Variant
 
 
Sub BuggeredSub()
    Dim qtSCQuestion As QuestionSC
    qtSCQuestion.qtQuestionType = QT_SINGLE_CHOICE
    varQuestionList(0) = qtSCQuestion
End Sub

That's the Gist of it. The above is in a .bas module.

[rjlohan]

And no, changing all the above to public makes no difference.

[crptcblade]

Hmmm, the only error I got was that private Types can't be coerced to Variants.

I give up.

[rjlohan]

Originally posted by crptcblade
Hmmm, the only error I got was that private Types can't be coerced to Variants.

I give up.

Yeah, that's the error message. The above was from the Help on that error, apologies. Nonetheless, it doesn't frickin work anyway... stoopid precompiler...

[crptcblade]

Yeah, to do what you want, the Type has to be declared as Public in an object module, like a class or uc. Why can't you have a QuestionSC array?

[rjlohan]

BEcause there are at least 2 other types I want in that array...

I'm trying to make a quick hard-coded solution for an 'exam' of sorts.

I also tried putting it in a class, and it still gave me the same error...

[rjlohan]

Can I have a public class in a standard .exe?