This function shows the term selector window for the selected concept.
object.ShowTermSelector()
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfile interface |
Display the code and code description of the selected concept.
Dim aTermSelector
Dim aConcept
Dim aTermset
Dim aMessage
Set aTermSelector = Profile.ShowTermSelector
if aTermSelector.Cancelled then
Profile.MsgBox("No concept is selected")
exit sub
end if
set aConcept = aTermSelector.SelectedConcept
aMessage =_
"The code of the concept: " & vbTab & vbTab & aConcept.Code & vbNewLine &_
"The description of the concept: " & vbTab & aConcept.Description & vbNewLine
set aTermset = aTermSelector.SelectedTermset
aMessage = aMessage &_
"The code of the termset: " & vbTab & vbTab & aTermset.Code & vbNewLine &_
"The description of the termset: " & vbTab & aTermset.Description
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Term Selector can be found in
.