ISDictionaryEntry.DictionaryName

Description

The name of the dictionary.

Syntax

object.DictionaryName

Part	Attribute	Type	Description
`object`	Required	ISDictionaryEntry	The `object` always implements the ISDictionaryEntry interface

Restriction: This property is readonly.

Return Value

string

Example

Display the name of the dictionary and the short information about its entries.

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.     Transl.Sing."

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

Profile.MsgBox(aDictInfo)

Note:

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

Version information

Added in v7.8.0