如何用程序实现将word文件转换成txt纯文本文件？

Question

以下通过WORD宏来实现的，
    ActiveDocument.SaveAs FileName:="test.txt", FileFormat:=wdFormatText,LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False,     SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= False

Answer 1

用VB的对象编程：
先在VB程序中引用Word的对象库(如MSWORD8.OLB) 
Dim WdApp As Word.Application
Dim Wddoc As Word.Document
Set WdApp = New Word.Application
Set Wddoc = WdApp.Documents.Open("test.doc")
Wddoc.SaveAs "test.txt", 3
Wddoc.Close
WdApp.Quit
注意：SaveAs后的参数3为文件类型，这里是指带分行符的文本。
由于相关资料不知放哪里去了，请自已查资料吧！

Answer 2

不想用VBA来实现，希望做成单独的控件，可以被别的程序来调用。

Answer 3

楼上的方法是很简单的， 
如果你不用 CreateObject方法，
你可以 引用 OFFICE 的 WORD 库！再说了， 楼上的代码也不是只能用在 VBA 中呀。