Syntax

 Public Sub RemoveItemByKey(ByVal value As List(Of VTLControls.ListViewItem))

Description

To remove item base on item key.

Parameters

Sample

 Dim colvalues as System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn) Dim colvalue as VTLGeneral.VTLControls.ListViewcolumn Dim lst as VTLGeneral.VTLControls.VTLListView Dim frm as VTLGeneral.VTLForm Dim itemvalues as New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewItem) Dim itemvalue as VTLGeneral.VTLControls.ListViewItem Public Sub main()          lst= New VTLGeneral.VTLControls.VTLListView("lst1")       frm= New VTLGeneral.VTLForm("frm1")      frm.AddVTLControl(lst)      lst.Height = "2000"      lst.width = "2000"      Dim btn as VTLGeneral.VTLControls.CChartObjectButton      btn = New VTLGeneral.VTLControls.CChartObjectButton("btn1")      frm.AddVTLControl(btn)      btn.caption = "Remove"      colvalues = New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)      colvalue = New VTLGeneral.VTLControls.ListViewcolumn      colvalue.Text = "Col1"      colvalue.Key = "Col1"      colvalue.Index = cstr(1)      colvalues.add(colvalue)      lst.AddHeader(colvalues)      colvalues.clear()      colvalues = New System.Collections.Generic.List(Of VTLGeneral.VTLControls.ListViewcolumn)      colvalue = New VTLGeneral.VTLControls.ListViewcolumn      colvalue.Text = "Col2"      colvalue.Key = "Col2"      colvalue.Index = cstr(2)      colvalues.add(colvalue)      lst.AddHeader(colvalues)      colvalues.clear()      frm.show()      itemvalue = New VTLGeneral.VTLControls.ListViewItem      itemvalue.Text = "Data"      itemvalue.Key = "S"       itemvalue.Index=CSTR(1)      itemvalue.AddSubItem("info1")      itemvalues.add(itemvalue)      itemvalue = New VTLGeneral.VTLControls.ListViewItem      itemvalue.Text = "Data"      itemvalue.Key = "W"       itemvalue.Index = CSTR(1)      itemvalue.AddSubItem("info2")      itemvalues.add(itemvalue)      lst.AddListItem(itemvalues) End Sub Public Sub frm1_btn1_click()      itemvalues.clear()      itemvalue = New VTLGeneral.VTLControls.ListViewItem      itemvalue.Key = "W"       itemvalues.add(itemvalue)      lst.RemoveItemByKey(itemvalues) End Sub

See Also

• ListViewcolumn
• ListViewItem
• VTLForm

Back to VTL Server Script Index