Como todos sabemos, o Word tem sua própria função de verificação ortográfica. No VB, é realmente muito simples chamar a função de verificação ortográfica do Word. O método é primeiro criar um objeto de palavra, depois colocar a string que precisa ser verificada no WORD, chamar a verificação ortográfica da palavra e, em seguida, retirar o valor de retorno. e finalmente feche o objeto.
O código de implementação específico de cada etapa é o seguinte:
Função CheckSpell(IncorrectText as string) as stringDim Word As Object, retText$ On Error Resume Next 'Crie um objeto WORD e abra Set Word = CreateObject("Word.Basic")'Coloque a STRING que precisa ser verificada em WORDWord.AppShowWord .FileNewWord.Inserir IncorrectText'Chame a verificação ortográfica do WORDWord.ToolsSpellingWord.EditSelectAll'obtenha o valor de retorno retText = Word.Selection$()CheckSpell = Left$(retText, Len(retText) - 1)'Fechar o arquivoWord.FileClose 2 ShowSet Word = NothingEnd FunçãoEste exemplo é fornecido com comentários detalhados para ajudar os leitores a entender. Além disso, os leitores podem consultar outros materiais baseados neste exemplo para fazer melhorias adicionais e obter funções mais poderosas!