Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
languagevb
Dim MyEntity As Entity 
Dim MyAttribute As AttributeObj 
Dim bIsKey As Boolean 
Dim AttributeName As String 

bIsKey = True 
AttributeName = "City" 

Set MyAttribute = MyEntity.Attributes.Add(AttributeName, bIsKey) 
Info
titleSee Also