网页素材: 导航菜单选项卡滑动门焦点图图片切换下拉菜单弹出层Tabs链接提示

您的当前位置: 源码爱好者 » 网页制作教程(编程教程) » VB技术教程

VB 中调用 Word 拼写检查

  • 标签:调用Word 更新时间:2014-07-22
  • 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

     

  • 已读: 次 收藏本文关闭本文打印本文复制链接
处理 SSI 文件时出错