This function returns the concepts by the concept and termset names.
object.LoadConceptsByName(ConceptName,
TermsetName)
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
|
ConceptName |
In, Required | string |
The concept name of the concept |
TermsetName |
In, Required | string |
The termset name of the concept |
Display the number of the concepts and their names.
Dim aConceptName
Dim aTermsetName
Dim aConcepts
Dim aConcept
Dim aMessage
aConceptName = "Weight"
aTermsetName = "intraHealth"
Set aConcepts = Profile.LoadConceptsByName(aConceptName, aTermsetName)
aMessage = "Concepts Count = " & aConcepts.Count
for i = 0 to aConcepts.Count - 1
set aConcept = aConcepts.Item(i)
aMessage = aMessage & vbNewLine & aConcept.Name
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Concepts can be found in
.