ID of the concept.
object.ID
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISConcept interface |
int
Display the name and ID of the selected concept.
Dim aConcept
Dim aTermsetCode
Dim aConceptCode
aTermsetCode = "IH"
aConceptCode = "z..2T"
Set aConcept = Profile.Concept(aTermsetCode, aConceptCode)
if aConcept is nothing then
Profile.MsgBox("There is no concept with the specified codes.")
else
Profile.MsgBox("ID of the concept with the name " & aConcept.Name & " is " &_
aConcept.ID)
end if
In Profile Client v8 on User Interface ID cannot be found, but Concept can be found in
or in .