' Custom List View (CLV) add text item||Private clv1 As CustomListView||clv1.AddTextItem(str,val)
' set a CLV item panel||Private Sub set_clv1_item(strlayout As String) As Pane||	Dim pn As Pane||	pn.Initialize("")||	pn.LoadLayout(strlayout)||	pn.SetLayoutAnimated(0, 0, 0, ???.Width,???.Height)||	Return pn||End Sub
' add a CLV item using a panel||Dim pnl As Pane = set_clv1_item("clv1item_layout")||pnl.PrefWidth = pnl.Width||pnl.PrefHeight = pnl.Height||clv1.Add(pnl,index)
' insert an item at the top of a CLV||Dim pnl As Pane = set_clv1_item("clv1item_layout")||pnl.PrefWidth = pnl.Width||pnl.PrefHeight = pnl.Height||clv1.InsertAt(0,pnl,val)
' change view tag from CLV item (reindex)||For i = 0 To clv1.Size -1||	clv1.GetPanel(i).GetView(0).Tag = i		' first view of the item panel||Next||
' change the background color of CLV item panel||For i = 0 To clv1.Size -1||	clv1.GetPanel(i).Color = xui.Color_ARGB(255,210,210,255)||Next
' fill a list with data from CLV items||For i = 0 To clv1.Size -1||	Dim str As String = clv1.GetPanel(i).GetView(0).Text	' first view of item panel||	lst.Add(str)||Next||
' reset textfields from a CLV item panel (second and fourth view)||clv1.GetPanel(selectedindex).GetView(1).Text = ""||clv1.GetPanel(selectedindex).GetView(3).Text = ""