Send a frame control to a procedure as a parameter

[JDMils]

I have code which will enable one of 10 frames on a form depending on a
control parameter which is predetermined. Here is my code which enables a
fram control and all controls within it:

Private Sub ActivateFrameAndControls(ByRef aFrame As Object)
aFrame.Enabled = True
' Cycle thru all controls in the respective frame.
For Each InnerCtrl In aFrame.Controls
' Enable each one.
InnerCtrl.Enabled = True
Next InnerCtrl
End Sub

My problem is that my calling code will pass th frame to the procedure, but
the line "aFrame.Enabled = True" fails with the error "Runtime error 438.
Object does not support this property or method".

Here's my calling code:

If bShowApp Then ActivateFrameAndControls (Me.fraApp)

 

[JDMils]

Found the problem....it was in my calling code. It should have been:

If bShowApp Then Call ActivateFrameAndControls (Me.fraApp)