用戶控件
<% @ Control ClassName="Hello" %><script language="vb" runat="server">Private _name As StringPublic Property Name As StringGet Return _nameEnd GetSet _name=ValueEnd SetEnd PropertyPublic Sub SayHello()Label1.Text="Hello," & _name & "!"End Sub</Script><asp:Label id=Label1 runat="server"></asp:Label>
Web頁面
<% @ Page Language="vb" %>'以聲明方式添加用戶控件<% @ Register TagPrefix="aspnetsbs" TagName="Hello" Src="Hello.ascx" %><html><head><script runat="server">
Sub Page_Load(Sender As Object,E As EventArgs)MyHello.Name="HURENFEI"MyHello.SayHello
End Sub</script></head><body><aspnetsbs:Hello id="MyHello" runat="server"/></body></html>
<% @ Page Language="vb" %>'以編程方式添加用戶控件<% @ Reference Control="Hello.ascx" %><html><head><script runat="server">Sub Page_Load(Sender As Object,E As EventArgs)Dim MyHello As Control=LoadControl("Hello.ascx")HelloHolder.Controls.Add(MyHello)CType(MyHello,Hello).Name ="HuRenfei"CType(MyHello,Hello).SayHelloEnd Sub</script></head><body><asp:placeholder id="HelloHolder" runat="server"/></body></html>
<% @ Control ClassName="Hello" %>
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。