VB调用Word拼写检查功能实例
众所周知,Word有自带的拼写检查功能。VB中想要实现调用Word拼写检查功能其实很简单就可以实现,方法是先建立word对象,然后把需要检查的字符串放到WORD中,调用word拼写检查,再取出返回值,最后关闭对象。
各个步骤的具体实现代码如下所示:
FunctionCheckSpell(IncorrectTextasstring)asstring
DimWordAsObject,retText$
OnErrorResumeNext
'建立WORD对象并打开
SetWord=CreateObject("Word.Basic")
'把需要检查的STRING放到WORD
Word.AppShow
Word.FileNew
Word.InsertIncorrectText
'调用WORD拼写检查
Word.ToolsSpelling
Word.EditSelectAll
'得到返回值
retText=Word.Selection$()
CheckSpell=Left$(retText,Len(retText)-1)
'关闭文件
Word.FileClose2
Show
SetWord=Nothing
EndFunction
本实例备有详细的注释,帮助读者理解,此外读者还可以在本实例的基础上参阅其他资料做进一步的改善,以实现更为强大的功能!
热门推荐
10 八一幼儿祝福语大全简短
11 公司乔迁食堂祝福语简短
12 婚礼结束聚餐祝福语简短
13 儿媳买车妈妈祝福语简短
14 毕业送礼老师祝福语简短
15 同事辞职正常祝福语简短
16 恭贺新婚文案祝福语简短
17 金店立秋祝福语简短英文
18 婆婆高寿祝福语大全简短