test if OptionButton is child of OptionGroup

[Gabriele Bertolucci]

In VBA I would like to test if an OptionButton is chiled of an OptionGroup.

I wrote this test

OptionButton.Parent.ControlType = acOptionGroup

It's all OK if this test is executed on an OptionButton which IS CHILD of
an OptionGroup, but if the OptionButton is a standalone control I get the
following error:

Run-time error '2465':
Error defined by application or object

I know I can use an error manager and test that specific error, but I would
like to know if there exists an alternative way.

Thanks.

--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution

[chris.nebinger]

If there is an alternative, I don't know what it is. I would recommend
trapping the error (the optionbuttons parent is the form object, which
does not support the ControlType property)

Chris

[chris.nebinger]

Actually, I got to thinking right after I submitted this...

The problem here is that the form does not support the ControlType
property. So, why not just make one?

In the form code, add:
Property Get ControlType() As Integer
ControlType = -1
End Property
Now, when you reference OptionButton.Parent.ControlType for an unbound
option button, it will return -1.

Chris