public object modules?

[vbcandies]

Hello I set up a "type", included in my .bas module...seems to work fine:

Public Type DynaData
 FramePar As Integer
 VIndex As Integer
 EEPloc As Integer
 NoRespOK As Boolean
End Type

In my main form General Declarations I do:

Dim RadBut(200) As DynaData

I use this without problem in various routines & various calculations. However I need to pass this type to a sub (as well as similar types to the same sub, which is why I want to create a sub in the first place)

call MYSub(123, RadBut() )    'should it be plain RadBut or RadBut()?

such as:

  Public Sub MySub(intAbc as Integer, FakeType as DynaData)

...however here it gives a compiler error saying
"only public user defined types defined in public object modules can be used as parameters..... "

Ok so where should I put my type definition (what IS a public object module?) or how do I make one of my private modules public?

[HanneSThEGreaT]

http://support.microsoft.com/kb/185700

[WizBang]

Where are you trying to put the Public Sub?

[vbcandies]

Where are you trying to put the Public Sub? ...in my "program" That is, I click on the form, and that is where all of my other code is located.
Where should I place my Type definition? Any example would be helpful

[WoF]

If you want to pass a complete array to a sub you have to declare your parameter accordingly:

Public Sub MySub(intAbc as Integer, FakeType() as DynaData)
'This allows later
MySub 5, RadBut
'or
Call MySub(5, RadBut)
'which is the same

[WizBang]

If you move the Public Sub (declared as WoF suggests) to the .bas module, it should work. Then you can call the sub from any form in your program.

[vbcandies]

I changed the type of sub I was having trouble with from public to private & POOF ...all the compiler errors went away & it works just fine!