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)

See Also

  • No labels