Hello all, this is my first post on CodeGuru.

I am currently developing an ActiveX exe using VB 6.0. My plan calls for a private class (clsJournalBase) to be delcared and instanced once through sub Main() when the first exportable object is created.

I have two classes (clsJournal and clsJournalMaster both GlobalMultiUse) that can be exported through this exe; I am trying to get each object exported to create a reference to the single instance of clsJournalBase in the main module in order to have the exported objects react to events raised from clsJournalBase.

I know I cannot use the GetObject() function since I have created these classes in VB; and when I try to create my own function to pass the reference (written as a public function in main module), it creates a new instance in the two exported classes.

Is there a way to pass a reference back with out using GetObject()?

Any help would be appreciated. If some one has already posted a similar situation, please let me know or link to it.

Thank you in advance.