With Accordion1 '- add header - Dim head As New Label head.ID = "LblHeader" head.Text = "label" Dim accpane As New AjaxControlToolkit.AccordionPane accpane.HeaderContainer.Controls.Add(head) '- add Data - Dim Data As New Label Data.ID = "LblData" Data.Text = "label" accpane.ContentContainer.Controls.Add(Data) Accordion1.Panes.Add(accpane) End With Protected Sub Accordion1_DataBound(ByVal sender As Object, ByVal e As AjaxControlToolkit.AccordionItemEventArgs) Handles Accordion1.ItemDataBound '- Do something End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)