>The last shouldn't be there!
>

dim oApp as BM_App
>set oApp = New BM_App
>
>oApp.SomeProp = "Hello"

That's what I thought. So there is no way to accomplish what I need.

The BM_App class looks something like:

Public oAcad AS AcadApplication

public sub Connect()
   set oAcad = GetObject(, "Autocad.Application")
end sub

public sub ShowFormWiz
   dim oForm as frmWiz
   Set oForm = new frmWiz

   oForm.show vbModal
endsub

Somehow I need frmWiz to be able to access the oAcad var in BM_App. I had thought making it public would allow that but I get an error.