Reading Occurrence Visibility

[Anonymous]

Hello, am trying to read occurrence visibility using

VARIANT_BOOL isVisible; 

occurrence->get_Visibility (&isVisible); 

but above function does not return anything , is there any other way to read occurrence visibility ?

Regards. 

[Anonymous]

I am not sure what language you are using, but this is all that is needed in VB

Of course you would need to set it up recursive to check all components in sub assemblies.

Public Sub isVisible()

Dim oAssemDoc As AssemblyDocument
Set oAssemDoc = ThisApplication.ActiveDocument

Dim oAssemCompDef As ComponentDefinition
Set oAssemCompDef = oAssemDoc.ComponentDefinition

Dim ooCC As ComponentOccurrence

For Each ooCC In oAssemCompDef.Occurrences
    MsgBox (ooCC.Name & ": " & ooCC.Visible)
Next


End Sub