高手请看，word文档中Range对象里的文本，怎么取得对应的纯文本

word文档中Range对象里面的文本，怎么取得纯文本， 比如Range对象中的文本通常都是带word格式的文本，如何能取得对应的纯文本（即没有任何word格式） 本来就没有格式啊，比如：

    Dim doc As Word.Document

    Dim p As Word.Paragraph

    

    '打开WORD文档（代码略）

    

    For Each p In doc.Paragraphs

        Debug.Print p.Range.Text

    Next

Range.Text属性里面还是包括了特殊字符，如果把word文档另存问纯文本文件，就没有这些特殊字符了。

补充：VB ,  基础类