ActiveHyphenationDictionary 属性

返回一个 Dictionary 对象，该对象代表指定语言的活动断字词典。只读。

说明

如果没有安装指定语言的断字词典，本属性将返回 Nothing。

示例

本示例显示活动断字词典的完整路径和文件名。

Dim lngLanguage As Long
Dim dicHyphen As Dictionary

lngLanguage = Selection.LanguageID
Set dicHyphen = Languages(lngLanguage).ActiveHyphenationDictionary
If dicHyphen Is Nothing Then
    MsgBox "No hyphenation dictionary installed!"
Else
    MsgBox dicHyphen.Path & Application.PathSeparator & dicHyphen.Name
End If