I am trying to assign a plotstyle to attribute while creating a block.
First I create the block, then I insert the Blockref, in that process I have errors assigining a plotstyle to the attribute.
(I have also tried to assign the plotstyle while creating the block and attribute with poor results.)
Here is my attempt to do this:
For Each objId As ObjectId In blkTblR
Dim obj As DBObject = objId.GetObject(OpenMode.ForRead)
If TypeOf obj Is AttributeDefinition Then
Dim ad As AttributeDefinition = objId.GetObject(OpenMode.ForRead)
Dim ar As AttributeReference = New AttributeReference()
ar.Position = ad.Position.TransformBy(blkRef.BlockTransform)
ar.PlotStyleName = "025"
Access a broad range of knowledge to help get the most out of your products and services.