vb中如何打开word文件并读出其中的内容

Question

最近刚学习学习VB，想要在VB6 中打开word文件并读出文件中某行的内容，考虑
word文件的结构不能知道，只能将word文件看成对象，是用document、application之类的对象吗，请教如何实现

Answer 1

Dim w As Word.Application
Dim wd As Word.Document
Set w = CreateObject("Word.Application")
'w.Visible = True '表示让WORD可见
Set wd = w.Documents.Open(FileName:="你想要打开的DOC文件路径", ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, Revert:=False)
Dim s As String
s = wd.ActiveWindow.Selection.Text
Debug.Print s
Set w = Nothing
Set wd = Nothing

Answer 2

别忘了在“工程”-“引用”中引用：Microsoft Word

Answer 3

word.Selection.Document.Paragraphs(4).Range.Select'选择第四段
word.Selection.Document.Range(9, 89).Select'选择从文档开头第10个字符到第90个字符
S=word.Selection.Text'取得所选文字
你可以去word的帮助文档里看看，或者建立一个宏看看他的代码