How do I pass a Usercontrol Object to a subroutine?

[moeur]

If I have a subroutine how can I pass a usercontrol to that routine?

Private Sub testDevice(newGD As UserControl)
End sub
'call it using test Usercontrol

Gives me an "Invalid use of Base Class name" Error when called
I tried As Variant and As Object: same error.

The only way I can think of is to expose all the properties and methods of the Usercontrol object in the final control and pass myUserControl as Object. Any other way?