NavigationNode Property Example

This example uses the NavigationNode property to return the file name associated with the navigation node.

Private Sub GetNavNode()
Dim myWeb As Web
Dim myNavNode As NavigationNode
Dim myNavNodeLabel As String

Set myWeb = ActiveWeb
Set myNavNode = _
    myWeb.RootNavigationNode.Files(0).NavigationNode

With myNavNode
    myNavNodeLabel = .Label
End With
End Sub