XRefLayerVisibility property example

Sub XrefVis_Example()
     ' This example returns the current setting of XRefLayerVisibility.
     Dim bXrefVis As Boolean
     bXrefVis = ThisDrawing.Preferences.XRefLayerVisibility
     MsgBox "The XRefLayerVisibility property is: " & bXrefVis
End Sub
Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. Copyright © 2001- Menhirs NV - All rights reserved.