none
Corrector ortografico vb 2010 RRS feed

  • Pregunta

  • Buenos tardes, amigos. Tengo el siguiente código para comprobar la Ortografía de un textbox, cuando ejecuto con el servidor de Visual Basic 2010 el programa funciona correctamente, (el proyecto hecho en vb2010 y Windows 10). creo que tengo un problema, porque cuando lo ejecuto con el EXE (después de compilar el proyecto) NO ABRE LA PANTALLA DE WORD PARA CORREGIR LOS ERRORES.
    Se queda bloqueado y no responde a nada, (solamente cuando solicito el Administrador de Tareas,  observo que está activado Microsoft Word correctamente), y tengo que pulsar sobre - Tarea - de MICROSOFT WORD, de esta manera SI ABRE LA PANTALLA DE WORD PARA CORREGIR LOS ERRORES.

    Este es el código:

    En Referencias
    Microsoft Word 16.0 Object Library

    Antes del Modulo

    Imports System.Windows
    Imports Microsoft.Office.Interop
    Imports vb = Microsoft.VisualBasic

    En el Modulo
    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

    La verdad es que pido papas, por mucho que investigo no encuentro una solución
    ¿Porque no da error cuando hago la depuración?
    ¿Que estoy haciendo mal y no me doy cuenta?

    Gracias anticipadas.

    jueves, 22 de noviembre de 2018 18:24

Respuestas

  • Hola   Adolfo Lago

    Gracias por levantar tu consulta en los foros de MSDN. Con respecto a la misma, te comento que nos encontramos realizando la revisión del inconveniente que presentas.

    Te daremos una respuesta a la brevedad posible.

    Gracias por usar los foros de MSDN.

    Pablo Rubio
     ____

    Por favor recuerde "Marcar como respuesta" las respuestas que hayan resuelto su problema, es una forma común de reconocer a aquellos que han ayudado, y hace que sea más fácil para los otros visitantes encontrar la solución más tarde. 

    Microsoft ofrece este servicio de forma gratuita, con la finalidad de ayudar a los usuarios y la ampliación de la base de datos de conocimientos relacionados con los productos y tecnologías de Microsoft.  

    Este contenido es proporcionado "tal cual" y no implica ninguna responsabilidad de parte de Microsoft.
    • Marcado como respuesta Pablo Rubio miércoles, 28 de noviembre de 2018 18:04
    jueves, 22 de noviembre de 2018 19:56