Word VBA教程:MeaningCount属性

返回在同义词库中找到的单词或短语的含义列表中的条目数。如果未找到含义,则返回 0(零)。Long 类型,只读。

expression.MeaningCount

expression  必需。该表达式返回一个SystemInfo对象。

说明

单词或短语的每一个含义都代表独特的同义词列表。

相关单词、相关词句和反义词不作为含义列表中的条目进行统计。

VBA示例

本示例检测是否找到所选内容的含义。如果找到,则在“Visual Basic 编辑器”的“立即”窗口中显示含义列表。


Set mySynInfo = Selection.Range.SynonymInfo
If mySynInfo.MeaningCount <> 0 Then
    myList = mySynInfo.MeaningList
    For i = 1 To Ubound(myList)
        Debug.Print myList(i)
    Next i
Else
    Msgbox "There were no meanings found."
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号