Description

ID of the bounded user datatype object, if any. A user can bind a user datatype object to the attribute by assigning a particular user datatype ID to this property. DATATYPE: Integer.

Property Type

  • Read-write property

Syntax

Public Property UserDatatypeId() As Variant

Example

Sub Main 

Dim diag As Diagram 
Dim dict As Dictionary 
Dim mdl As Model 
Dim ent As Entity 
Dim attr As AttributeObj 
Dim udt As UserDatatype 

Set diag = DiagramManager.NewDiagram 

Set dict = diag.Dictionary 
Set mdl = diag.ActiveModel 

Set udt = dict.UserDatatypes.Add(“MyUDT”) 
udt.Datatype = “INTEGER” 

Set ent = mdl.Entities.Add(100,100) 
ent.EntityName = “MyEntity” 
Set attr = ent.Attributes.Add(“NewAttr”, False) 
attr.UserDatatypeId = udt.ID 

End Sub 
  • No labels