content页 tt.aspx
<%@ Page Language="VB" MasterPageFile="~/master3.master" AutoEventWireup="false" CodeFile="tt.aspx.vb" Inherits="tt" title="Untitled Page" %>
<%@ Register Src="usercontrol/menuSysManage.ascx" TagName="menuSysManage" TagPrefix="uc1" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<asp:Button ID="Button1" runat="server" Text="sys" Width="160px" />
</asp:Content>
对应的tt.aspx.vb
Partial Class tt
Inherits System.Web.UI.Page
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim wweb As WebPartZone
wweb = CType(Master.FindControl("webpartzone1"), WebPartZone)
Dim part As WebPart
part = wweb.WebParts.Item(0)
Dim dd As ASP.menuSysManage
dd = CType(part.FindControl("MenuSysManage1"), ASP.menuSysManage)
dd.Visible = False
End Sub
End Class
注意:menuSysManage是我的自定义控件名称