LanguageSpecific 属性

如果为 True，则该自定义词典只用于格式为特定语言的文字。Boolean 类型，可读写。

expression   必需。该表达式返回“应用于”列表中的一个对象。

示例

本示例检查是否有自定义词典用于某种特定语言。如果有这类词典，则本示例从活动自定义词典列表中将其删除。

Dim dicLoop As Dictionary

For each dicLoop in CustomDictionaries
   If dicLoop.LanguageSpecific = True Then dicLoop.Delete
Next dicLoop

本示例添加一个自定义词典，该词典只检查格式为德语的文字。

Dim dicNew As Dictionary

Set dicNew = CustomDictionaries.Add("German1.dic")
dicNew.LanguageSpecific = True
dicNew.LanguageID = wdGerman