从word.application创建一个同义词列表框？ [英] Create a list box of synonyms from word.application?

问题描述

有没有办法使用word.application从单词同义词中提取同义词并让它们出现在列表框中？我知道如何使用word.application打开同义词库，但我不知道如何提取数据以显示在Access中。我已经在网上搜索了这个主题并且发现了很少的东西。


如果这是不可能的，我会对了解任何其他集成方法感兴趣一个词库到Access 2007数据库。


谢谢，

Adam

Is there a way to use word.application to pull synonyms from the word thesaurus and have them appear in a list box? I know how to bring up the thesaurus box using word.application, but I don''t know how to extract that data to appear in Access. I''ve searched the web on this topic and found surprisingly little about it.

If this isn''t possible, I''d be interested in knowing any other methods of integrating a thesaurus into an Access 2007 database.

Thanks,
Adam

推荐答案

1. 以下Sub-Routine，使用Microsoft Word自动化，将生成传递给它的Word的同义词列表：
   

1. The following Sub-Routine, using Automation with Microsoft Word, will generate a list of Synonyms for the Word passed to it:
   

展开 | 选择 | Wrap | 行号

ADezii - 这是非常出色的！我今天要测试一下。

谢谢，

Adam

ADezii - That''s positively outstanding! I''ll test it out today.
Thanks,
Adam

@AdamOnAccess


我故意使调用非常灵活，因为有多种方法可以返回同义词，例如填充列表框，函数返回数组，在逗号分隔的单行上等。

PS - 您也可以返回反义词。

@AdamOnAccess
I''ve intentionally made the call very flexible in that there are a variety of Methods to return the Synonyms, e.g. populate a List Box, Function returning an Array, on a single line delimited by a comma, etc.

P.S. - You can also return Antonyms.

这篇关于从word.application创建一个同义词列表框？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！