Imports Docs.Word Module Module1 Sub Main() ' Creates an instance of Document class Dim Doc As New Document() ' Reads a .doc file into internal document structure Doc.ReadDoc("..\..\Data\DocFile.doc") ' Gets text of 1st paragraph of 1st section of document Dim Text As String = DirectCast(Doc.Sections(0).Nodes(0), Paragraph).Text ' Writes gotten text to console Console.WriteLine(Text) Console.ReadKey() End Sub End Module