IsLinkBar Property

True indicates that the navigation node is a link bar. Read-only Boolean.

Note  Link bars provide hypertext links that allow you to navigate through the pages in the current Web site.

expression.IsLinkBar

expression    Required. An expression that returns a NavigationNode object.

Example

The following example traverses the navigation node hierarchy and displays the names of any link bars in the Web site. If no link bars are found a message is displayed to the user.

    Sub DisplayLinkBar()
'Return a collection of all navigation nodes used in the current Web site
'Searches through the collection and displays the names of all link bars

    Dim objApp As FrontPage.Application
    Dim objNavNode As NavigationNode
    Dim objNavNodes As NavigationNodes
    Dim strAns As String
    Dim blnFound As Boolean

    blnFound = False
    Set objApp = FrontPage.Application
    'Create a reference to the NavigationNodes collection
    Set objNavNodes = objApp.ActiveWeb.AllNavigationNodes
    'For each node in the collection
    For Each objNavNode In objNavNodes
       'If set to True, this is a link bar
       If objNavNode.IsLinkBar = True Then
           MsgBox objNavNode.Label & " is a link bar."
           blnFound = True
       End If
    'Go to next node
    Next objNavNode
    'If no link bars are found, display a message
    If blnFound = False Then
        MsgBox "There are no link bars in the current Web site."
    End If
End Sub