FrontPage VBA教程:activeElement属性

返回代表当前文档中的活动元素的 IHTMLElement对象。

expression.activeElement

expression  必选。返回DispFPHTMLDocument对象的表达式。

VBA示例

下列示例返回当前文档的活动元素并显示与元素相关联的类的名称。如果 className属性为空,则向用户显示一条消息。


Sub ReturnActiveElement()
'Returns the active element of the current document
'and displays the element's class name.
    Dim objApp As FrontPage.Application
    Dim objElement As IHTMLElement
    Set objApp = FrontPage.Application
    Set objElement = objApp.ActiveDocument.activeElement
    'If the classname is not empty then
    If objElement.className <> "" Then
        'Display class name to user
        MsgBox "The current element is a " & _
               objElement.className & "."
    Else
       'Otherwise display message
       MsgBox "The current element has no associated class name."
    End If
End Sub

上页:FrontPage VBA教程:ActiveDocument属性 下页:FrontPage VBA教程:ActiveFrameWindow属性

FrontPage VBA教程:activeElement属性

FrontPage VBA教程:ActiveFrameWindow属性 FrontPage VBA教程:ActivePageWindow属性
FrontPage VBA教程:ActiveWeb属性 FrontPage VBA教程:ActiveWebWindow属性
FrontPage VBA教程:alinkColor属性 FrontPage VBA教程:all属性
FrontPage VBA教程:AllFiles属性 FrontPage VBA教程:AllFolders属性
FrontPage VBA教程:AllNavigationNodes属性 FrontPage VBA教程:AllowMultipleResponses属性
FrontPage VBA教程:AllowsLongFilenames属性 FrontPage VBA教程:anchors属性
FrontPage VBA教程:AnswerWizard属性 FrontPage VBA教程:applets属性
FrontPage VBA教程:Application属性 FrontPage VBA教程:Assistant属性
FrontPage VBA教程:bgColor属性 FrontPage VBA教程:body属性
FrontPage VBA教程:Build属性 FrontPage VBA教程:Caption属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号