ASP.NET 页面中动态加载用户控件

    Public IsRefreshPH As Boolean = False    '是否刷新 PlaceHolder

    Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkButton1.Click
        ViewState("IsShow") = 1
        IsRefreshPH = True
    End Sub

    Protected Sub LinkButton2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkButton2.Click
        ViewState("IsShow") = 0
        IsRefreshPH = True
    End Sub

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

        If ViewState("IsShow") = 1 Then
            LoadCtrl()
        End If

    End Sub

    Protected Sub Page_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRender
        If IsRefreshPH Then
            LoadCtrl()
        End If
    End Sub

    '装载用户控件过程
    Sub LoadCtrl()

        PlaceHolder1.Controls.Clear()

        If ViewState("IsShow") = 1 Then
            Dim c As UserControl = LoadControl("~/tstZHT.ascx")
            c.ID = "ZHT"
            PlaceHolder1.Controls.Add(c)
        End If

    End Sub