FrontPage VBA教程:hasSharedBorders属性

返回 Boolean 类型的值,该值确定文档中的元素是否互相共享边框。如果为 True,则两个元素共享同一个边框。如果为 False,则当前文档内没有元素共享边框。只读。

expression.hasSharedBorders

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

VBA示例

下列示例显示给用户的消息,表明文档中的元素是否共享公用边框。


Sub SharedBorders()
'Determines if the current document has shared borders
    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Check if document has shared borders
    If objDoc.hasSharedBorders = True Then
        'If yes, display message
        MsgBox "The current document, " & objDoc.nameProp & _
               ", has shared borders."
    Else
        'If no, display message
        MsgBox "The current document, " & objDoc.nameProp & _
               ", does not have shared borders."
    End If
End Sub

上页:FrontPage VBA教程:FrameWindow属性 下页:FrontPage VBA教程:Home属性

FrontPage VBA教程:hasSharedBorders属性

FrontPage VBA教程:Home属性 FrontPage VBA教程:HomeNavigationNode属性
FrontPage VBA教程:HorizontalResolution属性 FrontPage VBA教程:htmlViewText属性
FrontPage VBA教程:ignoreSharedBorders属性 FrontPage VBA教程:images属性
FrontPage VBA教程:InNavBars属性 FrontPage VBA教程:IsDirty属性
FrontPage VBA教程:IsExecutable属性 FrontPage VBA教程:IsHiddenFoldersEnabled属性
FrontPage VBA教程:IsLinkBar属性 FrontPage VBA教程:IsOpen属性
FrontPage VBA教程:IsOrphan属性 FrontPage VBA教程:IsReadable属性
FrontPage VBA教程:IsRoot属性 FrontPage VBA教程:IsUnderRevisionControl属性
FrontPage VBA教程:IsWeb属性 FrontPage VBA教程:IsWritable属性
FrontPage VBA教程:Item属性 FrontPage VBA教程:Label属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号