Custom Controls ASP.Net Tutorial

  1. Home
  2. ASP.Net Tutorial
  3. Custom Controls
  4. Populating user control properties from the host Web page (VB)
<%@ Page Language="VB" %>
<%@ Register Src="Control.ascx" TagName="WebUserControl"
    TagPrefix="uc1" %>


Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
    Me.WebUserControl1.Text = "The quick brown fox jumped over the lazy dog"
End Sub



    Untitled Page


    
    

        
    

    


File: Control.ascx
<%@ Control Language="VB" ClassName="WebUserControl" %>

    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