Just as with *IS and *ISNOT Operator, you can use the *IsEqualTo, *IsNotEqualTo, *IsOfType and *IsNotOfType operators to perform testing of component reference variables:
If (#COM_OWNER *IsEqualTo #Phbn_1.Parent)
Use Builtin(Ov_Message_box) With_Args("3. #COM_OWNER is equal to #PHBN_1.Parent")
Endif
If (#COM_OWNER *IsNotEqualTo #Phbn_1)
Use Builtin(Ov_Message_box) With_Args("4. #COM_OWNER is not equal to #PHBN_1")
Endif
If (#COM_OWNER *IsOfType #AADFORM22)
Use Builtin(Ov_Message_box) With_Args("5. #COM_OWNER is of type #AADFORM22")
Endif
If (#COM_OWNER *IsNotOfType #PRIM_PHBN)
Use Builtin(Ov_Message_box) With_Args("6. #COM_OWNER is not of type #PRIM_PHBN")
Endif