Imports System

Imports System.Web

imports System.Web.UI.HtmlControls

​

Public Module Module1

    Public Sub Main()

        Dim OverviewLink1 as HtmlAnchor = new HtmlAnchor()

        Dim OverviewLink2 as HtmlAnchor = new HtmlAnchor()

        Dim state As HttpApplicationState = HttpContext.Current.Application("blog-1-1")

        OverviewLink1.HRef = state ' <-- Error happens on this line

        OverviewLink2.HRef = HttpContext.Current.Application("blog-1-1")

    End Sub

End Module