Protected Sub Page_LoadComplete(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LoadComplete
panel1.Visible = False 'panel设为隐藏
panel2.Visible = False
Dim numa As String = "panel" '定义panel变量名
Dim hd As HiddenField '传递hiddenfield控件值
Dim pn As Panel '传递panel控件值
If Page.IsPostBack Then '本页调用新闻
numa += CType(Master.Session.Item("numba"), String) '查找本地变量numba值 Else '跨页调用新闻
hd = PreviousPage.Master.FindControl("HiddenField1") '查找前一页hiddenfield控件
'通过HiddenField控件传递值
numa += hd.Value
End If
pn = Master.FindControl("ContentPlaceHolder1").FindControl(numa) '查找panel控件 pn.Visible = True
End Sub
必须用LOAD_LoadComplete 事件
用 POSTBACKURL调用另一个网页
控件所在位置一定要写的完整