源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

VB调用Word拼写检查功能实例

  • 时间:2020-07-20 12:12 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:VB调用Word拼写检查功能实例
众所周知,Word有自带的拼写检查功能。VB中想要实现调用 Word 拼写检查功能其实很简单就可以实现,方法是先建立word对象,然后把需要检查的字符串放到 WORD中,调用word拼写检查,再取出返回值,最后关闭对象。 各个步骤的具体实现代码如下所示:
Function CheckSpell(IncorrectText as string) as string
Dim Word As Object, retText$ 
On Error Resume Next 
'建立WORD对象并打开
Set Word = CreateObject("Word.Basic")

'把需要检查的 STRING 放到 WORD
Word.AppShow
Word.FileNew
Word.Insert IncorrectText

'调用WORD 拼写检查 
Word.ToolsSpelling
Word.EditSelectAll

'得到返回值 
retText = Word.Selection$()
CheckSpell = Left$(retText, Len(retText) - 1)

'关闭文件
Word.FileClose 2 
Show

Set Word = Nothing
End Function

本实例备有详细的注释,帮助读者理解,此外读者还可以在本实例的基础上参阅其他资料做进一步的改善,以实现更为强大的功能!
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部