ISDictionary.Name

Description

The name of the dictionary.

Syntax

object.Name

Part Attribute Type Description
object Required
The object always implements the ISDictionary interface
Restriction: This property is readonly.

Return Value

string

Example

Display the name of the dictionary, the list of dictionary entries and some information about them.

Dim aDictionary
Dim aAllEntries, aEntry
Dim aDictInfo
Dim i

Set aDictionary = Profile.GetDictionary("Legal")
set aAllEntries = aDictionary.AllEntries  

aDictInfo = _
  "Dictionary name: " & aDictionary.Name & vbNewLine &_  
  "Entry Count: " & aAllEntries.Count & vbNewLine & vbNewLine &_ 
  "#  Main Sing.    Main Plur.    Abbr. Sing.    Abbr. Plur."  

for i = 0 to aAllEntries.Count - 1
  set aEntry =  aAllEntries.Item(i) 
  aDictInfo = aDictInfo & vbNewLine & (i + 1) & ") " &_
    aEntry.SingleMain & "           " & aEntry.PluralMain & "        " &_
    aEntry.AbbrSingleMain & "                 " & aEntry.AbbrPluralMain         
next

Profile.MsgBox(aDictInfo)  
Note:

In Profile Client v8 on User Interface the Name can be found in Maintain > Lexicon.

Version information

Added in v7.8.0