Description
Adds a new attribute (specified by the given name and key/non-key value) to the entity, and then returns the new attribute to the caller. PARAMETERS: Name as String, IsKey as Boolean.
Syntax
Public Function Add( _ ByVal Name As Variant, _ ByVal IsKey As Variant _ ) As AttributeObj
Parameters
- Name
- IsKey
Example
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)