<%@ Kontrolny Language= " VB " AutoEventWireup= " fałszywy " CodeFile= " control_content_box.ascx.vb " Inherits= " User_Controls_control_info_box " %>
Import System.ComponentModel
Częściowy Klasowy User_Controls_control_info_box
Dziedziczyć System.Web.UI.UserControl
Intymny _ContentTemplate Jako ITemplate = Nic
_
Własność Publiczna ContentTemplate () Jako ITemplate
Dostawać
Wracać _ContentTemplate
Końcówka Dostawać
Set (ByVal wartość Jako ITemplate)
_ContentTemplate = wartość
Końcówka Set
Końcówka Własność
Społeczeństwo Klasowy ContentContainer
Dziedziczyć Kontrola
Narzędzie INamingContainer
Końcówka Klasa
Jawny WriteOnly Własność Tytuł () [Sznurek]
Set (ByVal wartość [Sznurek])
Me.ltl_Title.Text = wartość
Końcówka Set
Końcówka Własność
Ochraniać Okręt podwodny Page_Init ()
'Jeżeli zadowolony szablon definiować na the mateczny strona then initialize the zadowolony szablon
Jeśli nie (ContentTemplate Być Nic) Wtedy
'Instantiate i initialize the zadowolony zbiornik klasa
Ćmić zbiornik Jako Nowy ContentContainer ()
ContentTemplate.InstantiateIn (zbiornik)
'Dodawać the zadowolony szablon the placeholder tak, że my móc the użytkownik zawartość
Me.Content_Placeholder.Controls.Add (zbiornik)
Kończyć Jeżeli
Kończyć Okręt podwodny
Kończyć Klasa
The Tytuł precyzować nad pokaz ale the tekst tutaj! : (
|