Properties". Klikk " referanser ", velg deretter " Legg til". Velg ". NET " og klikk " DocumentFormat.OpenXml . " Klikk "OK". Dobbeltklikk på " Button1 " for å åpne VB vinduet
4 Kopier og lim inn følgende kode i toppen av din VB.NET modulen for å erklære navnerom: .
Imports System.IO
Importen DocumentFormat.OpenXml.Packaging
Import DocumentFormat.OpenXml.Wordprocessing
5
Kopier og lim inn følgende kode under " button1_click " for å definere bane og dokument til åpent : en
Dim strDoc As String = "C : \\ docxFile.docx "
Dim txt As String
Dim stream Som Stream = File.open ( strDoc , FileMode.Open )
Rediger følgende linje med kode og skriv inn banen og navnet til dokumentet : en
Dim strDoc As String = "C : \\ docxFile.docx "
6
Kopier og lim inn følgende for å aktivere prosedyren til å faktisk lese dokumentet : en
OpenAndAddToWordprocessingStream ( bekk, txt )
stream.Close ( )
7
Kopier og lim inn følgende for å vise teksten leses i tekstboksen kontroll : en
Me.TextBox1.Text = txt
8
Kopier og lim inn følgende prosedyre å åpne DOCX -filen og returnere innholdet lese : en
Public Sub OpenAndAddToWordprocessingStream ( ByVal stream Som Stream , ByRef txt As String )
Dim wordprocessingDocument Som wordprocessingDocument = wordprocessingDocument.Open ( bekk, sann)
Dim kroppen som Body = wordprocessingDocument.MainDocumentPart.Document.Body
txt = body.InnerText.ToString
wordprocessingDocument.Close ( )
End Sub
9
Trykk " F5 " for å kjøre programmet , og klikk på « Button1 " for å utføre koden .