Partial Class UserControls_ETG_PageTitle
    Inherits System.Web.UI.UserControl

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim objPageSiteNode As Telerik.Sitefinity.Web.PageSiteNode = Telerik.Sitefinity.Web.SiteMapBase.GetActualCurrentNode()

        'Set page title.
        If Not objPageSiteNode Is Nothing Then
            pageTitle.Text = objPageSiteNode.Title
        Else
            pageTitle.Text = "Page Title"
        End If

    End Sub

End Class