Mega Code Archive

 

Categories / ASP.Net Tutorial / Custom Controls

 

Exposing user control properties (VB)

<%@ Control Language="VB" ClassName="WebUserControl" %> <script runat="server">     Private _text As String          Public Property Text() As String         Get             Return _text         End Get         Set(ByVal value As String)             _text = value         End Set     End Property          Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)         Me.Label1.Text = Me.Text     End Sub              Protected Sub Button1_Click(ByVal sender As Object, _       ByVal e As System.EventArgs)         Me.Label1.Text = "The quick brown fox clicked the button on the page"     End Sub </script> <asp:Label ID="Label1" runat="server" Text="Label"></asp:Label> <asp:Button ID="Button1" runat="server" Text="Button" OnClick="Button1_Click" />