How to highlight links in code
CSS navigation control in VB.Net
This is an alternative solution to create a menu
Front UI
<div class="menu">
<div class="divmenu">
<asp:HyperLink ID="lkhome" runat="server" NavigateUrl="~/en/default.aspx"><span>Home</span></asp:HyperLink></div>
<div class="divmenu">
<asp:HyperLink ID="lkmission" runat="server" NavigateUrl="~/en/Mission.aspx"><span>Mission Statement</span></asp:HyperLink></div>
<div class="divmenu">
<asp:HyperLink ID="lkintroduction" runat="server" NavigateUrl="~/en/introduction.aspx"><span>Introduction</span></asp:HyperLink></div>
<div class="divmenu">
<asp:HyperLink ID="lkvision" runat="server" NavigateUrl="~/en/vision.aspx"><span>Our Vision</span></asp:HyperLink>
</div>
<div class="divmenu">
<asp:HyperLink ID="lkservices" runat="server" NavigateUrl="~/en/services.aspx"><span>Our Services</span></asp:HyperLink>
</div>
<div class="divmenu">
<asp:HyperLink ID="lkabout" runat="server" NavigateUrl="~/en/about.aspx"><span>About us</span></asp:HyperLink>
</div>
<div class="divmenu">
<asp:HyperLink ID="lknetwork" runat="server" NavigateUrl="~/en/network.aspx"><span>Network</span></asp:HyperLink>
</div>
<div class="divmenu">
<asp:HyperLink ID="lkcontact" runat="server" NavigateUrl="~/en/contact.aspx"><span>Contact us</span></asp:HyperLink>
</div>
</div>
Code Behind
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim address As String = Request.RawUrl.ToString
If address.IndexOf("default") > 0 Then
lkhome.CssClass = "active"
ElseIf address.IndexOf("Mission") > 0 Then
lkmission.CssClass = "active"
ElseIf address.IndexOf("introduction") > 0 Then
lkintroduction.CssClass = "active"
ElseIf address.IndexOf("about") > 0 Then
lkabout.CssClass = "active"
ElseIf address.IndexOf("contact") > 0 Then
lkcontact.CssClass = "active"
ElseIf address.IndexOf("network") > 0 Then
lknetwork.CssClass = "active"
ElseIf address.IndexOf("services") > 0 Then
lkservices.CssClass = "active"
ElseIf address.IndexOf("vision") > 0 Then
lkvision.CssClass = "active"
End If
End Sub