返回介绍

SynonymList 属性

发布于 2019-09-29 10:20:14 字数 907 浏览 846 评论 0 收藏 0

该属性返回单词或短语某一指定含义的同义词列表。该列表以字符串数组的形式返回。Variant 类型,只读。

expression.SynonymList(Meaning)

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

Meaning Variant 类型,必需。在包含可能含义的数组中以字符串或索引序号的形式表示的含义。

示例

本示例返回美国英语中单词“big”的含义“generous”的同义词列表。

Slist = SynonymInfo(Word:="big", LanguageID:=wdEnglishUS) _
 .SynonymList(Meaning:="generous")
For i = 1 To UBound(Slist)
 Msgbox Slist(i)
Next i

本示例返回所选单词或短语的第二个含义的同义词列表,并显示在“Visual Basic 编辑器”的“立即”窗口中。如果所选单词或短语没有第二个含义或没有其同义词,则在消息框中进行说明。

Set mySi = Selection.Range.SynonymInfo
If mySi.MeaningCount >= 2 Then
 synList = mySi.SynonymList(Meaning:=2)
 For i = 1 To UBound(synList)
 Debug.Print synList(i)
 Next i
Else
 MsgBox "There is no second meaning for this word or phrase."
End If

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文