Visual Basic - Corrector Ortografico Inestable

Life is soft - evento anual de software empresarial
   
Vista:

Corrector Ortografico Inestable

Publicado por Adolfo (6 intervenciones) el 09/11/2018 15:43:00
Buenas tardes, amigos. Tengo el siguiente código con el que compruebo la Ortografía de un textbox, todo lo hace perfectamente si ejecuto el proyecto (hecho en vb2010 y Windows 10) desde DEPURAR – INICIAR DEPURACION. Como el proyecto está OK, Pulso en Generar Programa, copio el EXE que está en la carpeta de Obj y lo anclo a la Barra de Tareas. Es aquí cuando al ejecutar el PROGRAMA y Hacer Clic sobre el CORRECTOR de ORTOGRAFIA, se queda Bloqueado y no responde a nada, (solamente cuando solicito el Administrador de Tareas y observo que están activados correctamente), y tengo que pulsar sobre - Finalizar Tarea- de MICROSOFT WORD, de esta manera puedo continuar, pero sin hacer la Comprobación de Ortografía.
Este es el código:
En Referencias
Microsoft Word 16.0 Object Library

Antes del Modulo
1
2
3
Imports System.Windows
Imports Microsoft.Office.Interop
Imports vb = Microsoft.VisualBasic

En el Modulo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub ComprobarOrtografia()
 
    Dim WordApp As New Word.Application
    WordApp.Visible = False
    Dim doc As Word.Document = WordApp.Documents.Add()
    Dim range As Word.Range
    range = doc.Range()
    range.Text = TrabajoOrtografia
    doc.Activate()
    doc.CheckSpelling()
    Dim chars() As Char = {CType(vbCr, Char), CType(vbLf, Char)}
    TrabajoOrtografia = doc.Range().Text.Trim(chars)
    doc.Close(SaveChanges:=False)
    WordApp.Quit()
 
End Sub

¿Porque no da error cuando hago la depuración?
¿Que estoy haciendo mal y no me doy cuenta?

Gracias anticipadas.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Revisar política de publicidad