htmlViewText 属性

返回或设置 String 类型的值，该值代表当前文档 HTML 视图的文本。可读写。

expression  必选。返回“应用于”列表中的对象之一的表达式。

示例

下列示例在“立即”窗口打印 HTML 视图的文本。该示例假定用户位于“HTML”视图中。

Sub HTMLViewtext()
'Displays the HTML view text

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display view text in immediate window
    Debug.Print objDoc.htmlViewtext

End Sub