Hvordan konvertere en DOC til en TXT i VB

Visual Basic, av seg selv, ikke inneholder de nødvendige verktøy for å arbeide med innholdet i Microsoft Word "DOC" filformat. Men hvis en kopi av Microsoft Word er installert på systemet sammen med Visual Basic, deretter Visual Basic vil automatisk bli utvidet på denne måte også.

Bruksanvisning

1 Opprett et nytt prosjekt i Visual Basic. Velg "Console Application" når du blir bedt om programtypen. Senere kan du bruke den samme koden i din egen grafisk brukergrensesnitt søknad, men velger konsollen kan opplæringen for å hoppe rett til koden som teller.

2 Lim inn følgende på den aller første linje av prosjektet (over "Module module1" linje):

importen Microsoft.Office.Interop

Hvis Microsoft Word ikke er installert på systemet ditt, så kommandoen vil bli understreket i grønt for å informere deg om dette faktum, og du kan ikke fortsette opplæringen.

3 Lim inn følgende i "Main" subrutine:

Dim Wapp = Ny Word.Application

Dim wDoc = wApp.Documents.Open (filnavn: = "file.doc", skrivebeskyttet = True)

wDoc.SaveAs ( "fil.txt", Word.WdSaveFormat.wdFormatDOSText)

wApp.Quit ()

Dette åpner en kopi av Microsoft Word i bakgrunnen, åpner dokumentet "file.doc" som skrivebeskyttet (en sikkerhetsfunksjon for å forhindre utilsiktede endringer i dokumentet), og kaller Word "Lagre som" -kommandoen til å lagre det som en DOS tekstfil kalt "fil.txt". Endelig er Microsoft Word lukkes automatisk.

Hint

• Hvis dette ikke fungerer, men du har Microsoft Office installert på systemet ditt, ta kontakt med de ressursene nederst i denne artikkelen for hjelp til å installere "Word Primary Interop Assembly," bibliotekene som tillater Visual Basic for å samhandle direkte med Microsoft Word.