Removes all alterations from the property alteration definition.

RemoveAll( ) As Boolean

Returns True on success.

The following excerpt from a larger example first clears the current query and then clears its property alterations by calling AlterLines.RemoveAll. For the complete example, click .

Dim amap As AcadMap

Dim qry As Query

Dim altls As AlterLines

 

Set amap = ThisDrawing.Application. _

GetInterfaceObject("AutoCADMap.Application") 

Set qry = amap.Projects.Item(ThisDrawing).CurrQuery

qry.Clear

' Define query main branch and conditions -- not shown

Set altls = qry.AlterProp

altls.RemoveAll