Public Partial Class HelpPlanning
  Inherits System.Web.UI.Page

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

  End Sub


  Private Sub ShowLoading(ByVal blnShow As Boolean)
    Dim imgLoading As WebControls.Image = Page.Master.FindControl("imgLoading")

    If blnShow Then
      imgLoading.CssClass = "visible"
    Else
      imgLoading.CssClass = "invisible"
    End If

  End Sub

  Private Sub HelpPlanning_PreRenderComplete(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRenderComplete
    ShowLoading(False)
  End Sub
End Class